DataMuseum.dk

Presents historical artifacts from the history of:

DANOSI

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DANOSI

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦1477279d8⟧ TextFile

    Length: 37526 (0x9296)
    Types: TextFile
    Names: »OUT35GRA.M«

Derivation

└─⟦7d3116ab8⟧ Bits:30010531 BOBS Sourcer RTP25,RTP11,RTP86,RTP ASN1 grammatikken DVBS1.SW2114.src.2.6-9 BB920506
    └─⟦this⟧ »RTP35\OUT35GRA.M«

TextFile

▶00◀*head cpu
bb  1991.05.06  10.00.41   cpu: ▶00◀107.14 sec.
▶00◀*bobs
▶00◀
 bobs8000   version 1988.02.16
 \f

************ A LIST OF INPUT WITH POSSIBLE ERRORMESSAGES  ************
 
  
  
  
  options(1, 3, 28, 32, 34)
  
 
 
  TERMINAL      INTERN VAERDI
 
  BOBS-GO                       0
  -EOF-                         1
  AND                           2
  ARRAY                         3
  AS                            4
  BEGIN                         5
  BEGINBODY                     6
  CASE                          7
  CHANNEL                       8
  CONST                         9
  CONTINUELOOP                 10
  DIV                          11
  DO                           12
  DOWNTO                       13
  ELSE                         14
  EMPTY                        15
  END                          16
  ENDLOOP                      17
  ERROR                        18
  EXIT                         19
  EXITLOOP                     20
  EXPORT                       21
  EXTERNAL                     22
  FOR                          23
  FORWARD                      24
  FUNCTION                     25
  GOTO                         26
  IF                           27
  IN                           28
  KONST                        29
  LABEL                        30
  LOCK                         31
  LOCKMES                      32
  LOOP                         33
  MOD                          34
  NAME                         35
  NOT                          36
  OF                           37
  OR                           38
  OTHERWISE                    39
  PACKED                       40
  PREFIX                       41
  POOL                         42
  PROCEDURE                    43
  PROCESS                      44
  REALKONST                    45
  RECORD                       46
  REPEAT                       47
  SET                          48
  SHIFT                        49
  STRING                       50
  THEN                         51
  TO                           52
  TYPE                         53
  TYPESIZE                     54
  UNTIL                        55
  VAR                          56
  VARSIZE                      57
  WHILE                        58
  WITH                         59
  XOR                          60
  +                            61
  -                            62
  *                            63
  /                            64
  '                            65
  "                            66
  <                            67
  >                            68
  <>                           69
  <=                           70
  >=                           71
  (                            72
  )                            73
  (.                           74
  .)                           75
  ^                            76
  =                            77
  :=                           78
  :=:                          79
  .                            80
  ,                            81
  ;                            82
  :                            83
  ..                           84
  #                            85
  ***                          86
  (*                           87
  ?                            88
  !                            89
  (:                           90
  :)                           91
  &                            92
 
 
  
 
 
  *****************************  END OF LIST *****************************
 
 \f

****************************  GRAMMARCHECKS  ****************************
 
  IT HAS BEEN CHECKED THAT ALL NONTERMINALS
  EXCEPT THE GOALSYMBOL APPEAR IN BOTH
  LEFT AND RIGHTSIDE OF A PRODUCTION
 
 
 
  IT HAS BEEN CHECKEDTHAT THERE 
  EXISTS NO IDENTICAL PRODUCTIONS 
 
 
 
 
 
  IT HAS BEEN CHECKED THAT ALL NONTERMINALS CAN
  PRODUCE A STRING OF ONLY TERMINAL SYMBOLS
 
 
  IT HAS BEEN CHECKED THAT NO NONTERMINAL
  IS BOTH LEFT AND RIGHT RECURSIVE
 \f

 ****************************** THE GRAMMAR ******************************




    1   <PROGRAM> ::= <EXTERNALPART> <BODY> .                         :000 CODE 

    2   <EXTERNALPART> ::= <EXTERNALS>                                :1311 ENDINCLUDE 

    3   <EXTERNALS> ::= <EXTERNALS> <EXTERNAL>                        :0 
    4                 ! <EXTERNAL>                                    :0 

    5   <EXTERNAL> ::= <CONTEXTNAME> <SEMICOLONS> <DECLARATIONS> .    :1310 ENDCONTEXT 
    6                ! ERROR .                                        :0 

    7   <SEMICOLONS> ::= <SEMICOLONS> ;                               :0 
    8                  ! ;                                            :0 

    9   <CONTEXTNAME> ::= NAME                                        :1301 CONTEXT 

   10   <BODY> ::= <BODYLIST>                                         :1303 EOM 

   11   <BODYLIST> ::= <BODYLIST> <BODYELEM>                          :0  
   12                ! <BODYELEM>                                     :0  

   13   <BODYELEM> ::= <BEGINLEVEL> <PROCESSDECLARATION>              :1312 ENDLEVEL 
   14                ! <BEGINLEVEL> <PREFIXDECLARATION>               :1312 ENDLEVEL 
   15                ! <BEGINLEVEL> <PROCESSDECLARATION> <SEMICOLONS> :1312 ENDLEVEL 
   16                ! <BEGINLEVEL> <PREFIXDECLARATION> <SEMICOLONS>  :1312 ENDLEVEL 

   17   <PROCESSDECLARATION> ::= PROCESS <PROCESS>                    :0 

   18   <PROCESS> ::= <PROCESSNAME> <FORMALPARAMETERS> <PROCSEMS> <BLOCK> :0 

   19   <PROCSEMS> ::= <SEMICOLONS>                                   :1304 ENDPROCDECL 

   20   <PROCESSNAME> ::= NAME                                        :1305 DECLARATION DECLARE 

   21   <BLOCK> ::= <DECLARATIONS> <STARTLABELSCOPE> <COMPOUNDSTATEMENT> 
                    <ENDLABELSCOPE>                                   :1011 ENDBLOCK ENDLEVEL ENDLEVEL
   22             ! EXTERNAL                                          :1020 EXTERNAL ENDLEVEL 
   23             ! FORWARD                                           :1021 FORWARD ENDLEVEL 
   24             ! <BEGINBODY> :                                     :0 ENDLEVEL 

   25   <STARTLABELSCOPE> ::= EMPTY                                   :1202 STARTLABELSCOPE 

   26   <ENDLABELSCOPE> ::= EMPTY                                     :1203 ENDLABELSCOPE 

   27   <BEGINBODY> ::= BEGINBODY <UNSIGNEDINTEGER>                   :-1 BEGINCODE ... 

   28   <BEGINLEVEL> ::= EMPTY                                        :1010 BEGINLEVEL 

   29   <DECLARATIONS> ::= <BEGINLEVEL> <DECLS>                       :1009 ENDDECLARATIONS 

   30   <DECLS> ::= EMPTY                                             :0 
   31             ! <DECLARATIONLIST>                                 :0 

   32   <DECLARATIONLIST> ::= <DECLARATIONLIST> <DECLARATIONPART>     :0 
   33                       ! <DECLARATIONPART>                       :0 

   34   <DECLARATIONPART> ::= <PROCESSDECLARATION> <SEMICOLONS>       :0 
   35                       ! <CONSTANTDECLARATION>                   :0 
   36                       ! <TYPEDECLARATION>                       :0 
   37                       ! <VARIABLEDECLARATION>                   :0 
   38                       ! <LABELDECLARATION>                      :0 
   39                       ! <ROUTINEDECLARATION> <SEMICOLONS>       :0 
   40                       ! <EXPORTPART>                            :0 

   41   <CONSTANTDECLARATION> ::= CONST <CONSTANTDECLARATIONLIST>     :0 

   42   <CONSTANTDECLARATIONLIST> ::= <CONSTANTDECLARATIONLIST> <CONSTANTDEFINITION> :0 
   43                               ! <CONSTANTDEFINITION>            :0 

   44   <CONSTANTDEFINITION> ::= <CONSTNAME> = <EXPRESSION> <SEMICOLONS> :501 ENDCONSTANTDECL 
   45                          ! <CONSTNAME> ERROR ;                  :503 ID(ANONYMOUS) ENDEXPRESSION ENDCONSTANTDECL 
   46                          ! ERROR ;                              :0 

   47   <CONSTNAME> ::= NAME                                          :502 DECLARATION DECLARE 

   48   <TYPEDECLARATION> ::= TYPE <TYPEDECLARATIONLIST>              :0 

   49   <TYPEDECLARATIONLIST> ::= <TYPEDECLARATIONLIST> <TYPEDEFINITION> :0 
   50                           ! <TYPEDEFINITION>                    :0 

   51   <TYPEDEFINITION> ::= <TYPENAME> <FORMALPARAMETERS> <EQTYPE>   :601 ENDTYPEDECL ENDLEVEL 
   52                      ! <TYPENAME> ;                             :617 NEWTYPE FORWARDPOINTER ENDTYPEDECL 

   53   <EQTYPE> ::= <EQ> <TYPE> <SEMICOLONS>                         :0 
   54              ! ERROR ;                                          :0 

   55   <EQ> ::= =                                                    :602 
   56          ! :                                                    :616 WARNING     

   57   <TYPE> ::= <VARIABLE>                                         :603 ENDTYPE 
   58            ! <STRUCTUREDTYPE>                                   :604 
   59            ! <POOLTYPE>                                         :604 
   60            ! <UPARROW> <TYPE>                                   :605 ENDPOINTER 
   61            ! <READONLY> <TYPE>                                  :606 ENDREADONLY 
   62            ! <STARTSCALAR> <IDENTIFIERLIST> )                   :607 ENDSCALAR 
   63            ! <EXPRESSION> <ENDSUBRANGE>                         :608 ENDSUBRANGE 
   64            ! <EXTERNALPROCESS> <FORMALPARAMETERS>               :609 ENDEXTPROCESS ENDLEVEL 

   65   <UPARROW> ::= ^                                               :620 NEWTYPE POINTER 

   66   <EXTERNALPROCESS> ::= EXTERNAL PROCESS                        :627 NEWTYPE EXTPROCESS 

   67   <STARTSCALAR> ::= ( NAME ,                                    :621 NEWTYPE SCALAR DECLARATION DECLARELIST

   68   <READONLY> ::= !                                              :622 NEWTYPE READONLY 

   69   <ENDSUBRANGE> ::= .. <EXPRESSION>                             :0 

   70   <STRUCTUREDTYPE> ::= <PACKED> <UNPACKEDSTRUCTUREDTYPE>        :614 PACKED 
   71                      ! <UNPACKEDSTRUCTUREDTYPE>                 :0 

   72   <PACKED> ::= PACKED                                           :628 STOP TYPE BUFFERING 

   73   <UNPACKEDSTRUCTUREDTYPE> ::= <ARRAYTYPE>                      :0 
   74                              ! <RECORDTYPE>                     :0 
   75                              ! <SETTYPE>                        :0 

   76   <TYPENAME> ::= NAME                                           :600 DECLARATION DECLARE 

   77   <ARRAYTYPE> ::= <ARRAYSTART> <TYPE> <COMPONENTTYPE>           :615 ENDARRAY 

   78   <ARRAYSTART> ::= ARRAY (                                      :623 NEWTYPE ARRAY 

   79   <COMPONENTTYPE> ::= <NEWDIMENSION> <TYPE> <COMPONENTTYPE>     :637 INCR. DIM._COUNT 
   80                     ! ) <OF> <TYPE>                             :636 DIM._COUNT := 0 

   81   <NEWDIMENSION> ::= ,                                          :623 NEWTYPE ARRAY 

   82   <RECORDTYPE> ::= <RECORD> <FIELDLIST> END                     :610 ENDLEVEL ENDRECORD 

   83   <RECORD> ::= RECORD                                           :624 NEWTYPE RECORD 

   84   <FIELDLIST> ::= <FIELDLIST> ; <RECORDSECTION>                 :0 
   85                 ! <RECORDSECTION>                               :0 

   86   <RECORDSECTION> ::= EMPTY                                     :0 
   87                     ! <STARTSECTION> <IDENTIFIERLIST> <TYPECOLON> 
                            <TYPE>                                    :611 ENDFIELD 

   88   <STARTSECTION> ::= EMPTY                                      :632 DECLARATION 

   89   <TYPECOLON> ::= :                                             :640 

   90   <SETTYPE> ::= <SETOF> <TYPE>                                  :612 ENDSET 

   91   <SETOF> ::= SET <OF>                                          :625 NEWTYPE SET 

   92   <POOLTYPE> ::= <POOL> <EXPRESSION> <TYPESIZE>                 :613 ENDPOOL 

   93   <TYPESIZE> ::= <OF> <TYPE>                                    :0 
   94                ! EMPTY                                          :635 WITHOUT_DATA 

   95   <OF> ::= OF                                                   :640 

   96   <POOL> ::= POOL                                               :626 NEWTYPE POOL 

   97   <VARIABLEDECLARATION> ::= VAR <VARIABLEDECLARATIONLIST>       :0 

   98   <VARIABLEDECLARATIONLIST> ::= <VARIABLEDECLARATIONLIST> <VARDECL> :0 
   99                               ! <VARDECL>                       :0 

  100   <VARDECL> ::= <STARTVAR> <IDENTIFIERLIST> <TYPEANDINIT>       :703 ENDVARDECL 

  101   <TYPEANDINIT> ::= <TYPECOLON> <TYPE> <INITIALIZATION> <SEMICOLONS> :0 
  102                   ! : ERROR ;                                   :0 

  103   <STARTVAR> ::= EMPTY                                          :700 DECLARATION 

  104   <IDENTIFIERLIST> ::= <IDENTIFIERLIST> , <IDENT>               :0 
  105                      ! <IDENT>                                  :0 

  106   <IDENT> ::= NAME                                              :701 DECLARELIST 
  107             ! ?                                                 :704 DECLARELIST 

  108   <INITIALIZATION> ::= := <EXPRESSION>                          :702 INIT 
  109                      ! EMPTY                                    :705 NO_INIT 

  110   <ROUTINEDECLARATION> ::= <ROUTINEHEADING> <SEMICOLONS> <BLOCK> :0 

  111   <ROUTINEHEADING> ::= <PROCEDUREHEADING>                       :1002 ENDPROCDECL 
  112                      ! <FUNCTIONHEADING>                        :1101 ENDFUNCDECL 

  113   <PROCEDUREHEADING> ::= PROCEDURE <PROCEDURENAME> <FORMALPARAMETERS> :0 

  114   <PROCEDURENAME> ::= NAME                                      :1003 DECLARATION DECLARE 
  115                     ! <SPIXNAME> = NAME                         :1004 DECLARATION DECLARE 

  116   <SPIXNAME> ::= NAME                                           :1001 PICK UP NAME 

  117   <FUNCTIONHEADING> ::= FUNCTION <FUNCTIONNAME> <FORMALPARAMETERS> 
                              <COLON> <TYPE>                          :0 

  118   <FUNCTIONNAME> ::= NAME                                       :1102 DECLARATION DECLARE 
  119                    ! <SPIXNAME> = NAME                          :1103 DECLARATION DECLARE 

  120   <COLON> ::= :                                                 :640 

  121   <FORMALPARAMETERS> ::= <INITFORMAL>                           :1007 ENDFORMAL 
  122                        ! <INITFORMAL> ( <FORMALLIST> )          :1007 ENDFORMAL 
  123                        ! <INITFORMAL> ( ERROR )                 :0 

  124   <INITFORMAL> ::= EMPTY                                        :1022 BEGINLEVEL 

  125   <FORMALLIST> ::= <FORMALLIST> <SEMICOLONS> <PARAMETERDESCRIPTION> :0 
  126                  ! <PARAMETERDESCRIPTION>                       :0 

  127   <PARAMETERDESCRIPTION> ::= <VARORVALUE> <PARAMETERGROUP> <TYPECOLON> 
                                   <TYPE>                             :1006 ENDFORMALLIST 

  128   <VARORVALUE> ::= EMPTY                                        :1023 DECLARATION 
  129                  ! VAR                                          :1024 DECLARATION 

  130   <PARAMETERGROUP> ::= <PARAMETERGROUP> , NAME                  :1008 DECLARELIST 
  131                      ! NAME                                     :1008 DECLARELIST 

  132   <LABELDECLARATION> ::= LABEL <LABELLIST> <SEMICOLONS>         :0 
  133                        ! LABEL ERROR ;                          :0 

  134   <LABELLIST> ::= <LABELLIST> , <LABELNAME>                     :0 
  135                 ! <LABELNAME>                                   :0 

  136   <LABELNAME> ::= KONST                                         :1201 DECLARATION DECLARE 
  137                 ! NAME                                          :1201 DECLARATION DECLARE 

  138   <PREFIXDECLARATION> ::= <PREFIXHEADING> <SEMICOLONS> <BEGINLEVEL> 
                                <ROUTINEDECLARATION>                  :1307 ENDLEVEL ENDPREFIX 

  139   <PREFIXHEADING> ::= PREFIX <PREFIXNAME>                       :0 
  140                     ! PREFIX ERROR                              :120 ERRORPREFIX 

  141   <PREFIXNAME> ::= NAME                                         :1306 DECLARATION DECLARE 

  142   <EXPORTPART> ::= EXPORT <EXPORTLIST>                          :0 

  143   <EXPORTLIST> ::= <EXPORTLIST> <EXPORTDEF>                     :0 
  144                  ! <EXPORTDEF>                                  :0 

  145   <EXPORTDEF> ::= <EXPORTNAME> = <EXPORTKIND> <SIMPLEVARIABLE> <SEMICOLONS> :301 EXPORT(KIND) 

  146   <EXPORTNAME> ::= NAME                                         :405 LITERAL TEXT 

  147   <EXPORTKIND> ::= NAME                                         :302 EXPORT 

  148   <COMPOUNDSTATEMENT> ::= <BEGIN> <STATEMENTLIST> END           :901 END 

  149   <BEGIN> ::= BEGIN                                             :902 BEGIN 

  150   <STATEMENTLIST> ::= <STATEMENTLIST> ; <STATEMENT>             :0 
  151                     ! <STATEMENTLIST> ERROR                     :0 
  152                     ! <STATEMENT>                               :0 

  153   <STATEMENT> ::= EMPTY                                         :0 
  154                 ! <COMPOUNDSTATEMENT>                           :0 
  155                 ! <PROCEDURECALL>                               :0 
  156                 ! <ASSIGNMENTSTATEMENT>                         :0 
  157                 ! <EXCHANGESTATEMENT>                           :0 
  158                 ! <CASESTATEMENT>                               :0 
  159                 ! <FORDO> <STARTLABELSCOPE> <STATEMENT> <ENDLABELSCOPE> :917 ENDFOR 
  160                 ! <GOTOSTATEMENT>                               :0 
  161                 ! <IFTHEN> <STATEMENT>                          :925 ENDIF 
  162                 ! <IFTHENELSE> <STATEMENT>                      :925 ENDIF 
  163                 ! <LABELNAME> : <STATEMENT>                     :0 
  164                 ! <REPEATSTATEMENT>                             :0 
  165                 ! <LOOPSTATEMENT>                               :0 
  166                 ! EXITLOOP                                      :953 EXITLOOP 
  167                 ! CONTINUELOOP                                  :951 CONTLOOP 
  168                 ! EXIT                                          :952 EXITSTAT 
  169                 ! <WHILEDO> <STARTLABELSCOPE> <STATEMENT> <ENDLABELSCOPE> :933 ENDWHILE 
  170                 ! <WITHSTART> <STARTLABELSCOPE> <STATEMENT> <ENDLABELSCOPE> :944 ENDWITH 
  171                 ! <LOCKSTART> <STARTLABELSCOPE> <STATEMENT> <ENDLABELSCOPE> :936 ENDLOCK 
  172                 ! <CHANNELDO> <STARTLABELSCOPE> <STATEMENT> <ENDLABELSCOPE> :947 ENDCHANNEL 

  173   <BALANCEDSTATEMENT> ::= EMPTY                                 :0 
  174                         ! <COMPOUNDSTATEMENT>                   :0 
  175                         ! <PROCEDURECALL>                       :0 
  176                         ! <ASSIGNMENTSTATEMENT>                 :0 
  177                         ! <EXCHANGESTATEMENT>                   :0 
  178                         ! <CASESTATEMENT>                       :0 
  179                         ! <FORDO> <STARTLABELSCOPE> <BALANCEDSTATEMENT> 
                                <ENDLABELSCOPE>                       :917 ENDFOR 
  180                         ! <GOTOSTATEMENT>                       :0 
  181                         ! <IFTHENELSE> <BALANCEDSTATEMENT>      :925 ENDIF 
  182                         ! <LABELNAME> : <BALANCEDSTATEMENT>     :0 
  183                         ! <REPEATSTATEMENT>                     :0 
  184                         ! <LOOPSTATEMENT>                       :0 
  185                         ! EXITLOOP                              :953 EXITLOOP 
  186                         ! CONTINUELOOP                          :951 CONTLOOP 
  187                         ! EXIT                                  :952 EXITSTAT 
  188                         ! <WHILEDO> <STARTLABELSCOPE> <BALANCEDSTATEMENT> 
                                <ENDLABELSCOPE>                       :933 ENDWHILE 
  189                         ! <LOCKSTART> <STARTLABELSCOPE> <BALANCEDSTATEMENT> 
                                <ENDLABELSCOPE>                       :936 ENDLOCK 
  190                         ! <WITHSTART> <STARTLABELSCOPE> <BALANCEDSTATEMENT> 
                                <ENDLABELSCOPE>                       :944 ENDWITH 
  191                         ! <CHANNELDO> <STARTLABELSCOPE> <BALANCEDSTATEMENT> 
                                <ENDLABELSCOPE>                       :947 ENDCHANNEL 

  192   <PROCEDURECALL> ::= <VARIABLE>                                :903 CALLPROCEDURE 

  193   <ACTUALPARAMETERLIST> ::= <ACTUALPARAMETER>                   :0 
  194                           ! <ACTUALPARAMETERLIST> , <ACTUALPARAMETER> :0 

  195   <ACTUALPARAMETER> ::= <UNIT>                                  :904 ACTUALPARAM 
  196                       ! <EXPRESSION> *** <UNIT>                 :905 DOUBLEPARAM 

  197   <UNIT> ::= <EXPRESSION>                                       :0 
  198            ! ?                                                  :955 SKIPVALUE 

  199   <ASSIGNMENTSTATEMENT> ::= <VARIABLE> := <EXPRESSION>          :906 ENDASSIGN 

  200   <EXCHANGESTATEMENT> ::= <VARIABLE> :=: <VARIABLE>             :907 ENDEXCHANGE 

  201   <CASESTATEMENT> ::= <SELECTORPART> <CASELIST> <ENDCASEPART>   :909 ENDCASE 

  202   <SELECTORPART> ::= <CASE> <EXPRESSION> OF                     :910 CASEEXPR 
  203                    ! <CASE> ERROR OF                            :0 

  204   <CASE> ::= CASE                                               :911 CASESTAT 

  205   <CASELIST> ::= <CASELIST> ; <CASELISTELEMENT>                 :0 
  206                ! <CASELISTELEMENT>                              :0 

  207   <CASELISTELEMENT> ::= EMPTY                                   :0 
  208                       ! <CASELABELLIST> <ENDLABELLIST> <STATEMENT> :912 CASEELEMENT 

  209   <CASELABELLIST> ::= <LABELRANGE>                              :0 
  210                     ! <CASELABELLIST> , <LABELRANGE>            :0 

  211   <LABELRANGE> ::= <EXPRESSION> .. <EXPRESSION>                 :913 CASELABELRANGE 
  212                  ! <EXPRESSION>                                 :914 CASELABEL 

  213   <ENDLABELLIST> ::= :                                          :915 CASELIST 

  214   <ENDCASEPART> ::= <OTHERWISE> <STATEMENTLIST> END             :912 CASEELEMENT 
  215                   ! END                                         :0 

  216   <OTHERWISE> ::= OTHERWISE                                     :916 OTHERWISE CASELIST 

  217   <FORDO> ::= <FORTO> <EXPRESSION> DO                           :918 UP 
  218             ! <FORTO> ERROR DO                                  :0 
  219             ! <FORDOWNTO> <EXPRESSION> DO                       :919 DOWN 
  220             ! <FORDOWNTO> ERROR DO                              :0 

  221   <FORTO> ::= <FORASSIGN> <EXPRESSION> TO                       :0 
  222             ! <FORASSIGN> ERROR TO                              :0 

  223   <FORDOWNTO> ::= <FORASSIGN> <EXPRESSION> DOWNTO               :0 
  224                 ! <FORASSIGN> ERROR DOWNTO                      :0 

  225   <FORASSIGN> ::= <FOR> <VARIABLE> :=                           :920 FORVAR 
  226                 ! <FOR> ERROR :=                                :0 

  227   <FOR> ::= FOR                                                 :921 FORSTAT 

  228   <GOTOSTATEMENT> ::= <GOTO> <LABNAME>                          :922 ENDGOTO 

  229   <GOTO> ::= GOTO                                               :923 GOTOSTAT 

  230   <LABNAME> ::= NAME                                            :924 ID 
  231               ! KONST                                           :924 ID 

  232   <IFTHEN> ::= <IFPART> <EXPRESSION> THEN                       :926 IFEXPR 
  233              ! <IFPART> ERROR THEN                              :0 

  234   <IFPART> ::= IF                                               :927 IFSTAT 

  235   <IFTHENELSE> ::= <IFTHEN> <BALANCEDSTATEMENT> ELSE            :928 ELSE 

  236   <REPEATSTATEMENT> ::= <REPEAT> <STARTLABELSCOPE> <STATEMENTLIST> 
                              <ENDLABELSCOPE> <UNTIL> <EXPRESSION>    :930 ENDREPEAT 

  237   <REPEAT> ::= REPEAT                                           :932 REPEATSTAT 

  238   <UNTIL> ::= UNTIL                                             :929 UNTIL 

  239   <LOOPSTATEMENT> ::= <LOOP> <STATEMENTLIST> ENDLOOP            :957 ENDLOOP 

  240   <LOOP> ::= LOOP                                               :956 LOOP 

  241   <WHILEDO> ::= <WHILE> <EXPRESSION> DO                         :934 WHILEEXPR 
  242               ! <WHILE> ERROR DO                                :0 

  243   <WHILE> ::= WHILE                                             :935 WHILESTAT 

  244   <WITHSTART> ::= <WITH> <WITHVARIABLELIST> DO                  :950 DO 

  245   <LOCKSTART> ::= <LOCK> <WITHVARIABLE> DO                      :950 DO 

  246   <WITH> ::= WITH                                               :937 WITHSTAT 

  247   <LOCK> ::= LOCK                                               :965 LOCKSTAT 
  248            ! LOCKMES                                            :966 LOCKMESSTAT 

  249   <WITHVARIABLELIST> ::= <WITHVARIABLE>                         :0 
  250                        ! <WITHVARIABLELIST> <WITHCOMMA> <WITHVARIABLE> :0 

  251   <WITHCOMMA> ::= ,                                             :938 WITHCOMMA 

  252   <WITHVARIABLE> ::= <VARIABLE>                                 :939 WITHVAR NOLOCALDECL 
  253                    ! <VARIABLE> <AS> <LOCALNAME> <TYPECOLON> <TYPE> :942 ENDLOCALDECL 
  254                    ! <VARIABLE> <AS> <LOCALNAME>                :943 NOLOCALTYPE 

  255   <AS> ::= AS                                                   :940 WITHVAR 

  256   <LOCALNAME> ::= NAME                                          :941 DECLARATION DECLARE 

  257   <CHANNELDO> ::= <CHANNEL> <VARIABLE> DO                       :948 CHANVAR 

  258   <CHANNEL> ::= CHANNEL                                         :949 CHANNELSTAT 

  259   <EXPRESSION> ::= <SIMPLEEXPRESSION>                           :801 ENDEXPRESSION 
  260                  ! <SIMPLEEXPRESSION> = <SIMPLEEXPRESSION>      :802 EQ ENDEXPRESSION 
  261                  ! <SIMPLEEXPRESSION> <> <SIMPLEEXPRESSION>     :803 NE ENDEXPRESSION 
  262                  ! <SIMPLEEXPRESSION> < <SIMPLEEXPRESSION>      :804 LT ENDEXPRESSION 
  263                  ! <SIMPLEEXPRESSION> <= <SIMPLEEXPRESSION>     :805 LE ENDEXPRESSION 
  264                  ! <SIMPLEEXPRESSION> > <SIMPLEEXPRESSION>      :806 GT ENDEXPRESSION 
  265                  ! <SIMPLEEXPRESSION> >= <SIMPLEEXPRESSION>     :807 GE ENDEXPRESSION 
  266                  ! <SIMPLEEXPRESSION> IN <SIMPLEEXPRESSION>     :808 IN ENDEXPRESSION 

  267   <SIMPLEEXPRESSION> ::= <SIMPLEEXPRESSION> + <TERM>            :810 PLUS 
  268                        ! <SIMPLEEXPRESSION> - <TERM>            :811 MINUS 
  269                        ! <SIMPLEEXPRESSION> OR <TERM>           :812 OR 
  270                        ! <SIMPLEEXPRESSION> XOR <TERM>          :815 XOR 
  271                        ! + <TERM>                               :813 UPLUS 
  272                        ! - <TERM>                               :814 UMINUS 
  273                        ! <TERM>                                 :0 

  274   <TERM> ::= <TERM> * <FACTOR>                                  :816 STAR 
  275            ! <TERM> / <FACTOR>                                  :817 SLASH 
  276            ! <TERM> DIV <FACTOR>                                :818 DIV 
  277            ! <TERM> MOD <FACTOR>                                :819 MOD 
  278            ! <TERM> AND <FACTOR>                                :820 AND 
  279            ! <TERM> SHIFT <FACTOR>                              :821 SHIFT 
  280            ! <FACTOR>                                           :0 

  281   <FACTOR> ::= <VALUEDENOTATION>                                :0 
  282              ! <VARIABLE>                                       :830 ENDVARIABLE 
  283              ! ( <EXPRESSION> )                                 :0 
  284              ! ( ERROR )                                        :0 
  285              ! TYPESIZE ( NAME )                                :840 TYPESIZECALL 
  286              ! VARSIZE ( NAME )                                 :841 VARSIZECALL 
  287              ! NOT <FACTOR>                                     :831 NOT 

  288   <VALUEDENOTATION> ::= <UNSIGNEDCONSTANT>                      :0 
  289                       ! <STRUCVALUEDENOTATION>                  :0 
  290                       ! <STRING>                                :409 LITERAL TEXT 
  291                       ! <SET>                                   :825 ENDSETLIST 

  292   <STRING> ::= STRING                                           :406 STRING 
  293              ! <STRING> & STRING                                :407 CONCATENATE STRINGS 
  294              ! <STRING> & NAME                                  :408 CONCATENATE WITH VALUE OF NAME 

  295   <SET> ::= <STARTSET> <ELEMENTLIST> .)                         :0 
  296           ! <STARTSET> .)                                       :0 

  297   <STARTSET> ::= (.                                             :826 SETLIST 

  298   <ELEMENTLIST> ::= <ELEMENTLIST> , <ELEMENT>                   :0 
  299                   ! <ELEMENT>                                   :0 

  300   <ELEMENT> ::= <EXPRESSION>                                    :827 S_ELEMENT 
  301               ! <EXPRESSION> .. <EXPRESSION>                    :828 M_ELEMENT 

  302   <STRUCVALUEDENOTATION> ::= <STARTSTRUCVAL> <ACTUALPARAMETERLIST> 
                                   :)                                 :847 ENDSTRUC 
  303                            ! <STARTSTRUCVAL> :)                 :847 ENDSTRUC 

  304   <STARTSTRUCVAL> ::= (:                                        :846 BEGINSTRUC 

  305   <SIMPLEVARIABLE> ::= NAME                                     :835 ID 
  306                      ! <SIMPLEVARIABLE> . NAME                  :836 FIELD 

  307   <VARIABLE> ::= NAME                                           :835 ID 
  308                ! <VARIABLE> . NAME                              :836 FIELD 
  309                ! <VARIABLE> <STRUCVALUEDENOTATION>              :0 
  310                ! <VARIABLE> <BEGINACTUAL> <ACTUALPARAMETERLIST> ) :837 ENDACTUAL 
  311                ! <VARIABLE> ^                                   :838 UPARROW 

  312   <BEGINACTUAL> ::= (                                           :839 BEGINACTUAL 

  313   <UNSIGNEDCONSTANT> ::= <UNSIGNEDINTEGER>                      :0 
  314                        ! REALKONST                              :403 LITERAL REAL 

  315   <UNSIGNEDINTEGER> ::= KONST                                   :402 LITERAL INTEGER 
  316                       ! # NAME                                  :404 LITERAL INTEGER 
  *************************************************************************
 \f

***********************************************************************
 
  THE GRAMMAR IS LALR1 
 
  ***********************************************************************
 \f

***********************COMPILER ERROR MESSAGES  ***********************
 
 
    ERRORNO : 0  ** SPECIAL ERROR **
 
 
    ERRORNO :  EXPECTED SYMBOL:
 
        1 :                  ERROR      NAME       
  nr=0
 nr=226
 nr=41
 nr=140

 
        2 :                  .          
  nr=6
 nr=5
 nr=1

 
        3 :                  ;          
  nr=5
 nr=110
 nr=133
 nr=102
 nr=101
 nr=54
 nr=53
 nr=46
 nr=45
 nr=44
 nr=18
 nr=39
 nr=34
 nr=138

 
        4 :                  NAME       
  nr=117
 nr=119
 nr=127
 nr=130
 nr=316
 nr=286
 nr=285
 nr=308
 nr=113
 nr=115
 nr=142
 nr=145
 nr=145
 nr=306
 nr=257
 nr=245
 nr=254
 nr=244
 nr=250
 nr=200
 nr=48
 nr=17

 
        5 :                  =          
  nr=119
 nr=115
 nr=145

 
        6 :                  ,          :          
  nr=130
 nr=104
 nr=210
 nr=104

 
        7 :                  NAME       ^          !          (          EXTERNAL   
                                     PACKED     POOL       +          -          ARRAY      
                                     RECORD     SET        TYPESIZE   VARSIZE    NOT        
                                     REALKONST  STRING     KONST      #          (:         
                                     (.         
  nr=127
 nr=90
 nr=87
 nr=77
 nr=93
 nr=61
 nr=60
 nr=80
 nr=79
 nr=117
 nr=253
 nr=101
 nr=53

 
        8 :                  .)         +          -          (          TYPESIZE   
                                     VARSIZE    NOT        NAME       REALKONST  STRING     
                                     KONST      #          (:         (.         
  nr=296

 
        9 :                  :)         ?          +          -          (          
                                     TYPESIZE   VARSIZE    NOT        NAME       REALKONST  
                                     STRING     KONST      #          (:         (.         
  nr=303

 
       10 :                  STRING     NAME       
  nr=293

 
       11 :                  (          TYPESIZE   VARSIZE    NOT        NAME       
                                     REALKONST  STRING     KONST      #          (:         
                                     (.         
  nr=287
 nr=279
 nr=278
 nr=277
 nr=276
 nr=275
 nr=274
 nr=272
 nr=271
 nr=270
 nr=269
 nr=268
 nr=267

 
       12 :                  (          
  nr=286
 nr=285
 nr=78

 
       13 :                  )          
  nr=286
 nr=285
 nr=284
 nr=283
 nr=123

 
       14 :                  ERROR      +          -          (          TYPESIZE   
                                     VARSIZE    NOT        NAME       REALKONST  STRING     
                                     KONST      #          (:         (.         
  nr=284
 nr=67
 nr=222
 nr=203
 nr=242
 nr=233
 nr=220
 nr=218

 
       15 :                  ?          +          -          (          TYPESIZE   
                                     VARSIZE    NOT        NAME       REALKONST  STRING     
                                     KONST      #          (:         (.         
  nr=310
 nr=196
 nr=194

 
       16 :                  +          -          (          TYPESIZE   VARSIZE    
                                     NOT        NAME       REALKONST  STRING     KONST      
                                     #          (:         (.         
  nr=266
 nr=265
 nr=264
 nr=263
 nr=262
 nr=261
 nr=260
 nr=301
 nr=298
 nr=92
 nr=69
 nr=211
 nr=210
 nr=199
 nr=236
 nr=108
 nr=44

 
       17 :                  )          ,          
  nr=310
 nr=62
 nr=77
 nr=79

 
       18 :                  :)         ,          
  nr=302

 
       19 :                  .)         ,          
  nr=295

 
       20 :                  OF         
  nr=91
 nr=80
 nr=203
 nr=202

 
       21 :                  NAME       ?          
  nr=87
 nr=104
 nr=62
 nr=100

 
       22 :                  PROCESS    
  nr=66

 
       23 :                  ARRAY      RECORD     SET        
  nr=70

 
       24 :                  ..         
  nr=63

 
       25 :                  END        ;          
  nr=82

 
       26 :                  )          ;          
  nr=122

 
       27 :                  :          
  nr=117
 nr=24
 nr=163
 nr=163

 
       28 :                  .          ;          
  nr=306

 
       29 :                  KONST      #          
  nr=27

 
       30 :                  BEGIN      
  nr=21

 
       31 :                  :=         
  nr=226

 
       32 :                  :=         .          ^          (          (:         
  nr=225

 
       33 :                  TO         DOWNTO     
  nr=222
 nr=221

 
       34 :                  DO         .          ^          (          (:         
  nr=257

 
       35 :                  DO         
  nr=245
 nr=242
 nr=241
 nr=220
 nr=219
 nr=218
 nr=217

 
       36 :                  DO         ,          
  nr=244

 
       37 :                  THEN       
  nr=233
 nr=232

 
       38 :                  NAME       KONST      
  nr=228
 nr=134

 
       39 :                  ELSE       
  nr=235

 
       40 :                  ;          END        OTHERWISE  
  nr=205

 
       41 :                  END        ;          ERROR      
  nr=214
 nr=148

 
       42 :                  UNTIL      
  nr=236

 
       43 :                  ENDLOOP    ;          ERROR      
  nr=239

 
       44 :                  ERROR      KONST      NAME       
  nr=133

 
       45 :                  ,          ;          
  nr=134

 
       46 :                  ERROR      =          :          
  nr=51

 
       47 :                  =          ERROR      
  nr=44

 
       48 :                  PROCESS    PREFIX     
  nr=16

 
       49 :                  PROCEDURE  FUNCTION   
  nr=138

 
       50 :                  -EOF-      
  nr=0

 
 
  *************************************************************************

end
blocksread = 211
▶00◀*head cpu
bb  1991.05.06  10.05.05   cpu: ▶00◀350.62 sec.
▶00◀*o c