OMAIN.LST 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. Listing:
  2. 1 MODULE omain;
  3. 2 (*%F _fdata*) Make program in XLarge or MThread model (*%E*)
  4. 3
  5. 4 IMPORT Ovl117,op1,op2,op3;
  6. 5
  7. 6 IMPORT IO; (* IO is used in op1-op3, and therefore must be initialized
  8. 7 before op1-op3 are used, this import ensures this *)
  9. 8
  10. 9 PROCEDURE x;
  11. 10 BEGIN
  12. 11 Ovl117.Load(1);
  13. ***** ^ not supported yet
  14. ***** ^ not supported yet
  15. ***** ^ not supported yet
  16. 12 op1.p1;
  17. ***** ^ not supported yet
  18. ***** ^ not supported yet
  19. 13 Ovl117.UnLoad(1);
  20. ***** ^ not supported yet
  21. ***** ^ not supported yet
  22. ***** ^ not supported yet
  23. 14 Ovl117.Load(2);
  24. ***** ^ not supported yet
  25. ***** ^ not supported yet
  26. ***** ^ not supported yet
  27. 15 op2.p2;
  28. ***** ^ not supported yet
  29. ***** ^ not supported yet
  30. 16 op3.p3;
  31. ***** ^ not supported yet
  32. ***** ^ not supported yet
  33. 17 Ovl117.UnLoad(2);
  34. ***** ^ not supported yet
  35. ***** ^ not supported yet
  36. ***** ^ not supported yet
  37. 18 END x;
  38. ***** ^ not supported yet
  39. 19
  40. 20 BEGIN
  41. 21 x;
  42. ***** ^ not supported yet
  43. 22 END omain.
  44. 23
  45. 24
  46. 20 errors