summaryrefslogtreecommitdiff
path: root/src/GF/Compile/BackOpt.hs
diff options
context:
space:
mode:
authoraarne <unknown>2005-02-10 09:43:33 +0000
committeraarne <unknown>2005-02-10 09:43:33 +0000
commitd676355271f360861b8462c4b788202ddd605b6d (patch)
treef2735c1123373f1ee8f9ccf2f0d9d24f01b1165c /src/GF/Compile/BackOpt.hs
parent9afbd25b64607e68fe6275fb6b743159001ca984 (diff)
gfc generation to incomplete modules
Diffstat (limited to 'src/GF/Compile/BackOpt.hs')
-rw-r--r--src/GF/Compile/BackOpt.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/GF/Compile/BackOpt.hs b/src/GF/Compile/BackOpt.hs
index 1c030f8e1..64068e93b 100644
--- a/src/GF/Compile/BackOpt.hs
+++ b/src/GF/Compile/BackOpt.hs
@@ -27,10 +27,10 @@ import qualified Modules as M
type OptSpec = [Integer] ---
-doOptFactor :: OptSpec
+doOptFactor :: OptSpec -> Bool
doOptFactor opt = elem 2 opt
-doOptValues :: OptSpec
+doOptValues :: OptSpec -> Bool
doOptValues opt = elem 3 opt
shareOpt :: OptSpec