d_lib2.LST 245 B

12345678910111213
  1. Listing:
  2. 1 DEFINITION MODULE DLib2;
  3. 2 FROM DLib IMPORT step;
  4. 3 CONST dbl = 10;
  5. 4 VAR flag : INTEGER;
  6. 5 TYPE SArr = ARRAY [0 .. step] OF INTEGER;
  7. 6 PROCEDURE Bump(VAR v : INTEGER);
  8. 7 END DLib2.
  9. 0 errors