Ver código fonte

Removed unused variables

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7523 8c9fc860-2736-0410-a75d-ab315db34111
negelef 7 anos atrás
pai
commit
52182493a2
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      source/TestSuite.Mod

+ 1 - 1
source/TestSuite.Mod

@@ -254,7 +254,7 @@ END DriveByReader;
 
 (* public interface helper *)
 PROCEDURE Drive* (context: Commands.Context; tester: Tester);
-VAR testname, resultname: Files.FileName; test, result: Files.File; reader: Files.Reader; writer: Files.Writer;
+VAR testname, resultname: Files.FileName; test: Files.File; reader: Files.Reader;
 BEGIN
 	IF context.arg.GetString (testname) THEN
 		test := Files.Old (testname);