--- a/tools/PascalBasics.hs	Fri May 11 23:22:01 2012 +0400
+++ b/tools/PascalBasics.hs	Fri May 11 23:34:35 2012 +0400
@@ -8,7 +8,7 @@
 import Text.Parsec.Language
 import Data.Char
 
-builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit", "break", "continue"]
+builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit", "break", "continue", "length"]
     
 pascalLanguageDef
     = emptyDef