d_basic.mod 163 B

123456789
  1. MODULE DBasic;
  2. FROM DLib IMPORT counter, Add;
  3. IMPORT DLib;
  4. VAR ExitCode : INTEGER;
  5. BEGIN
  6. counter := 20;
  7. Add(5);
  8. ExitCode := counter + DLib.Get()
  9. END DBasic.