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: 51bbb51a06
Branches Tags
freepascal.comp...
/
bugs
/
bug0171.pp

bug0171.pp 105 B
History Raw

1234567 
  1. type
    2. 

  2.   pstring=^string;
    3. 

  3. const
    4. 

  4.   drivestr:string='c:';
    5. 

  5.   pdrivestr:pstring=pstring(@drivestr);
    6. 

  6. begin
    7. 

  7. end.
    8.