gap07_convert.mod 369 B

12345678910
  1. MODULE Gap07Convert;
  2. (* Modula-2 gap (ISO SYSTEM): CONVERT(T, x) is a standard ISO generic
  3. conversion; V3 implements VAL but not CONVERT.
  4. Class: iso/system (a real missing feature).
  5. Corpus: procconv2.
  6. V3: undeclared identifier. *)
  7. FROM SYSTEM IMPORT ADDRESS;
  8. PROCEDURE foo; BEGIN END foo;
  9. VAR a : ADDRESS;
  10. BEGIN a := CONVERT(ADDRESS, foo) END Gap07Convert.