--- a/tools/PascalBasics.hs	Thu May 10 11:29:18 2012 +0400
+++ b/tools/PascalBasics.hs	Thu May 10 13:16:31 2012 +0400
@@ -8,7 +8,7 @@
 import Text.Parsec.Language
 import Data.Char
 
-builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit"]
+builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit", "break"]
     
 pascalLanguageDef
     = emptyDef