object ObjLang: TObjLang Left = 197 Top = 110 Width = 269 Height = 216 Caption = 'ObjLang' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object Compiler: TCompiler Errors.Strings = ( 'This work can not begin a program' 'Unexpected end of file' 'Identifier expected' 'This symbol can not begin a statement' 'Expression expected' 'Invalid expression' 'TIMES expected' 'List of arguments expected' 'Error in expression' 'List of arguments expected' ', or ) expected' 'Error in expression' 'Identifier expected' 'Condition is not finished' ':= or ( expected') Left = 8 Top = 8 LexemInfoList = ( 'K N .' 'K N -' 'K N +' 'K N ;' 'K N ���' 'K N ����' 'K N TIMES' 'K N ������' 'K N �����' 'K N BEGIN' 'K N END' 'K N (' 'K N )' 'K N ,' 'K N ����' 'K N ��' 'K N �����' 'K N ����' 'K N ������' 'K N ��' 'K N ���������' 'K N REPEAT' 'K N ��' 'K N IF' 'K N THEN' 'K N ELSE' 'K N WHILE' 'K N DO' 'K N UNTIL' 'K N NOT' 'K N >' 'K N <' 'K N =' 'K N <=' 'K N >=' 'K N <>' 'K N in' 'K N OR' 'K N AND' 'K N ���' 'K N �' 'K N *' 'K N /' 'K N div' 'K N rem' 'K N :=' 'K N ������' 'K N ����' 'K N TRUE' 'K N FALSE' 'L N Literal' 'I N ID' 'S N String' 'N N Neterm' 'V N Variable' 'K N .' 'K N -' 'K N +' 'K N ;' 'K N ���' 'K N ����' 'K N TIMES' 'K N ������' 'K N �����' 'K N BEGIN' 'K N END' 'K N (' 'K N )' 'K N ,' 'K N ����' 'K N ��' 'K N �����' 'K N ����' 'K N ������' 'K N ��' 'K N ���������' 'K N REPEAT' 'K N ��' 'K N IF' 'K N THEN' 'K N ELSE' 'K N WHILE' 'K N DO' 'K N UNTIL' 'K N NOT' 'K N >' 'K N <' 'K N =' 'K N <=' 'K N >=' 'K N <>' 'K N in' 'K N OR' 'K N AND' 'K N ���' 'K N �' 'K N *' 'K N /' 'K N div' 'K N rem' 'K N :=' 'L N Literal' 'I N ID' 'S N String' 'N N Neterm' 'V N Variable' 'K N .' 'K N -' 'K N +' 'K N ;' 'K N ���' 'K N ����' 'K N TIMES' 'K N ������' 'K N �����' 'K N BEGIN' 'K N END' 'K N (' 'K N )' 'K N ,' 'K N ����' 'K N ��' 'K N �����' 'K N ����' 'K N ������' 'K N ��' 'K N ���������' 'K N REPEAT' 'K N ��' 'K N IF' 'K N THEN' 'K N ELSE' 'K N WHILE' 'K N DO' 'K N UNTIL' 'K N NOT' 'K N >' 'K N <' 'K N =' 'K N <=' 'K N >=' 'K N <>' 'K N in' 'K N OR' 'K N AND' 'K N ���' 'K N �' 'K N *' 'K N /' 'K N div' 'K N rem' 'K N :=' 'L N Literal' 'I N ID' 'S N String' 'N N Neterm' 'V N Variable') RulesList = ( '`gram` `prog`' '`prog` `stat` ; `prog'#39'`' '`prog'#39'` `prog`' '`prog'#39'`' '`ID` `id`' '`id` `id/call` `id'#39'`' '`id'#39'`' '`id'#39'` . `id`' '`id/call` `id-el` `id/call'#39'`' '`id/call'#39'`' '`id/call'#39'` `call`' '`id-el` "ID"' '`id-el` ID' '`stat` `call-or-assig`' '`call-or-assig` `ID` `call-or-assig'#39'`' '`call-or-assig'#39'` `assig`' '`call-or-assig'#39'`' '`assig` := `e`' '`stat` `if`'