d_func.LST 167 B

123456789101112
  1. Listing:
  2. 1 MODULE DFunc;
  3. 2 FROM FLib IMPORT Fib;
  4. 3 VAR ExitCode : INTEGER;
  5. 4 BEGIN
  6. 5 ExitCode := Fib(10)
  7. 6 END DFunc.
  8. 0 errors