Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Tree: 90744753b9
Branches Tags
freepascal.comp...
/
tests
/
tbf
/
tb0112.pp

tb0112.pp 126 B
History Raw

1234567891011 
  1. { %version=1.1 }
    2. 

  2. { %FAIL }
    3. 

  3. 

  4. { in this mode, typed constants are read-only }
    5. 

  5. {$J-}
    6. 

  6. const
    7. 

  7.   w1 : word = 1;
    8. 

  8. 

  9. begin
    10. 

  10.   w1:=2;
    11. 

  11. end.
    12.