home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / TEST / LOADERTE.M < prev    next >
Encoding:
Text File  |  1990-07-04  |  902 b   |  3 lines
  1. ⓪ MODULE LoaderTest;
  2. ⓪ (*
  3. ⓪!* Prüft, ob reentry geht.
  4. ⓪!*)
  5. ⓪ IMPORT PathEnv, Terminal;
  6. ⓪ VAR ch: CHAR;
  7. ⓪ BEGIN
  8. ⓪"Terminal.WriteLn;
  9. ⓪"Terminal.WriteString ('HomePath: ');
  10. ⓪"Terminal.WriteString (PathEnv.HomePath);
  11. ⓪"Terminal.Write ('.');
  12. ⓪"Terminal.WriteLn
  13. ⓪ END LoaderTest.
  14. ⓪ ə
  15. (* $FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF19A6C$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950$FFF51950Ç$000000EFT.......T.......T.......T.......T.......T.......T.......T.......T.......T.......$00000027$00000055$000000FF$00000071$000000FF$FFF19A6C$000000D3$000000AC$0000009C$000000A7$000000EF$00000114$FFF19A6C$000000FF$00000059$0000003D¼Çé*)
  16.