Merge branch 'master' of https://github.com/GrammaticalFramework/GF

1 files changed, 0 insertions, 27 deletions

diff --git a/examples/app/MkApp.hs b/examples/app/MkApp.hs
deleted file mode 100644
index 2537b1cc5..000000000
--- a/examples/app/MkApp.hs
+++ /dev/null
@@ -1,27 +0,0 @@
--- update the import list of every language
--- although possibly some extra definitions at the end
--- the new files are produced in ./tmp/ which has to be created first
--- usage: runghc MkApp.hs
-
-langs = words "Bul Cat Chi Dut Eng Est Fin Fre Ger Hin Ita Jpn Spa Swe Tha"
-appCnc lang = "App" ++ lang ++ ".gf"
-
-appAbs = "App.gf"
-
-main = do
-  imports <- readFile appAbs >>= return . getImports
-  mapM_ (\f -> readFile f >>= writeFile ("tmp/" ++ f) . (putImports imports)) (map appCnc langs)
-
-getImports = takeWhile (/= ']') . tail . dropWhile (/='[')
-
-putImports i s = 
-  let
-    (s1,_:s2) = span (/='[') s
-    (_,   s3) = span (/=']') s2
-  in s1 ++ "[" ++ i ++ extra s3
-
-extra s = unlines (init (lines s) ++ extraLines ++ ["}"])
-
-extraLines = [
---  "  PassV2 v2 = passiveVP v2 ;"
-  ] -- default: no extra