reordered phrasebook sources so that they are easier to clone; cloned Ger,Spa,Cat,Bul

2026-04-23 19:42:50 -06:00 · 2010-04-07 19:39:48 +00:00
parent aeb0a5b7e0
commit 8171bb0ea2
33 changed files with 1211 additions and 354 deletions
--- a/examples/phrasebook/Clone.hs
+++ b/examples/phrasebook/Clone.hs
@@ -51,4 +51,4 @@ commentBody ss = header ++ map comment body ++ ["}"] where
  isJment ws = case ws of
    k:_ | elem k ["flags","lin","lincat","oper","param"] -> True
    _ -> False
-  comment l = "-- " ++ l
+  comment l = if take 2 l == "--" then l else "-- " ++ l