Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Formatting and be sure to reinitializeGlobals

Signed-off-by: Austin Seipp <mad.one@gmail.com>
  • Loading branch information...
commit 5504477519db295a27032a6404c29e6646e226fb 1 parent f1e3d4b
@thoughtpolice authored
Showing with 7 additions and 3 deletions.
  1. +7 −3 Strict/Plugin.hs
View
10 Strict/Plugin.hs
@@ -1,5 +1,8 @@
-module Strict.Plugin (plugin) where
-import Strict.Pass
+module Strict.Plugin
+ ( plugin -- :: Plugin
+ ) where
+
+import Strict.Pass (strictifyProgram)
import GhcPlugins
plugin :: Plugin
@@ -8,5 +11,6 @@ plugin = defaultPlugin {
}
install :: [CommandLineOption] -> [CoreToDo] -> CoreM [CoreToDo]
-install _option todos = do
+install _ todos = do
+ reinitializeGlobals
return $ CoreDoPluginPass "Strictify" strictifyProgram : todos
Please sign in to comment.
Something went wrong with that request. Please try again.