Home Explore Help
Sign In
pascal
/
fpc
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Tree: release_2_
Branches Tags
fpc
/
tests
/
webtbf
/
tw7438.pp

tw7438.pp 145 B
Permalink History Raw

1234567891011121314151617 
  1. { %norun }
    2. 

  2. 

  3. {$mode macpas}
    4. 

  4. unit tw7438;
    5. 

  5. 

  6. interface
    7. 

  7. 

  8. type
    9. 

  9.   tr = bitpacked record
    10. 

  10.     l1: longint;
    11. 

  11.     l2: longint;
    12. 

  12.   end;
    13. 

  13. 

  14. 

  15. implementation
    16. 

  16. 

  17. end.
    18.