b_libimpl.LST 226 B

123456789101112131415
  1. Listing:
  2. 1 IMPLEMENTATION MODULE BLib;
  3. 2 IMPORT ALib;
  4. 3 PROCEDURE GetB : INTEGER;
  5. 4 BEGIN
  6. 5 RETURN bval + ALib.aval
  7. 6 END GetB;
  8. 7 BEGIN
  9. 8 bval := 2
  10. 9 END BLib.
  11. 0 errors