Fixed script to only include .gf files. Updated generated script.

This commit is contained in:
bringert committed 2004-06-23 09:44:27 +00:00
1 parent 0f9070bf3a
commit cd3f267daa
2 files changed
+7 -11

No files matched your search

+1 -1
View File
@@ -14,7 +14,7 @@ excluded = ["numerals.Abs.gf"]
main :: IO ()
main = do
system "ls >files"
system "ls *.gf >files"
s <- readFile "files"
writeFile scriptFile $ unlines $ map mkOne $
filter (flip notElem excluded) $ lines s