d_func.mod 127 B

12345678
  1. MODULE DFunc;
  2. FROM DLib IMPORT Get, Add;
  3. VAR ExitCode : INTEGER;
  4. BEGIN
  5. Add(10);
  6. Add(Get());
  7. ExitCode := Get()
  8. END DFunc.