parser.h 575 B

123456789101112131415161718192021222324252627
  1. C
  2. C PARSER OUTPUT
  3. C
  4. LOGICAL PRSWON
  5. COMMON /PRSVEC/ PRSA,PRSI,PRSO,PRSWON,PRSCON
  6. C
  7. C PARSER STATE
  8. C
  9. COMMON /ORPHS/ OFLAG,OACT,OSLOT,OPREP,ONAME
  10. INTEGER ORP(5)
  11. EQUIVALENCE (OFLAG, ORP)
  12. C
  13. COMMON /LAST/ LASTIT
  14. C
  15. COMMON /PV/ ACT,O1,O2,P1,P2
  16. INTEGER OBJVEC(2),PRPVEC(2),PVEC(5)
  17. EQUIVALENCE (OBJVEC(1),O1),(PRPVEC(1),P1),(PVEC,ACT)
  18. C
  19. COMMON /SYNTAX/ VFLAG,DOBJ,DFL1,DFL2,DFW1,DFW2,
  20. & IOBJ,IFL1,IFL2,IFW1,IFW2
  21. INTEGER SYN(11)
  22. EQUIVALENCE (VFLAG, SYN)
  23. C
  24. COMMON /SYNFLG/ SDIR,SIND,SSTD,SFLIP,SDRIV,SVMASK
  25. C
  26. COMMON /OBJFLG/ VABIT,VRBIT,VTBIT,VCBIT,VEBIT,VFBIT,VPMASK