Add vectorise subdirectory and dummy module

diff --git a/compiler/Makefile b/compiler/Makefile
index 5e5504b..dcaf18e 100644 (file)
--- a/compiler/Makefile
+++ b/compiler/Makefile
@@ -367,7 +367,7 @@ SRC_HC_OPTS += -Istage$(stage)
 
 ALL_DIRS = \
   utils basicTypes types hsSyn prelude rename typecheck deSugar coreSyn \
-  specialise simplCore stranal stgSyn simplStg codeGen main \
+  vectorise specialise simplCore stranal stgSyn simplStg codeGen main \
   profiling parser cprAnalysis ndpFlatten iface cmm
 
 # Make sure we include Config.hs even if it doesn't exist yet...

diff --git a/compiler/package.conf.in b/compiler/package.conf.in
index 806b094..3de7068 100644 (file)
--- a/compiler/package.conf.in
+++ b/compiler/package.conf.in
@@ -277,6 +277,7 @@ import-dirs:   FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/utils",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/deSugar",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/ghci",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/coreSyn",
+               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/vectorise",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/specialise",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/simplCore",
               FPTOOLS_TOP_ABS"/compiler/stage"STAGE"/stranal",

diff --git a/compiler/vectorise/Vectorise.hs b/compiler/vectorise/Vectorise.hs
new file mode 100644 (file)
index 0000000..720019b
--- /dev/null
+++ b/compiler/vectorise/Vectorise.hs
@@ -0,0 +1,15 @@
+module Vectorise( vectorise )
+where
+
+#include "HsVersions.h"
+
+import DynFlags
+import HscTypes
+
+vectorise :: HscEnv -> ModGuts -> IO ModGuts
+vectorise hsc_env guts
+  | not (Opt_Vectorise `dopt` dflags) = return guts
+  | otherwise                         = return guts
+  where
+    dflags = hsc_dflags hsc_env
+