home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / SED.ZIP / PASCAL < prev    next >
Text File  |  1986-05-04  |  121b  |  10 lines

  1. { this is a test }
  2. x := y
  3. begin
  4. end
  5. if (x>=y)
  6. x<>y
  7. x or y
  8. procedure foo();
  9. function fie(abc,def,gef): integer;
  10.