Listing: 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. 0 errors