diff --git a/lang/m2/libm2/InOut.mod b/lang/m2/libm2/InOut.mod
index 743e4417b..223eb9fc3 100644
--- a/lang/m2/libm2/InOut.mod
+++ b/lang/m2/libm2/InOut.mod
@@ -67,7 +67,7 @@ IMPLEMENTATION MODULE InOut ;
 	openinput(filename);
   END OpenInputFile;
 
-  PROCEDURE openinput(VAR namebuf: ARRAY OF CHAR);
+  PROCEDURE openinput(namebuf: ARRAY OF CHAR);
   BEGIN
 	IF (namebuf[0] = '-') AND (namebuf[1] = 0C) THEN
 		CurrIn := Streams.InputStream;
@@ -106,7 +106,7 @@ IMPLEMENTATION MODULE InOut ;
 	openoutput(filename);
   END OpenOutputFile;
 
-  PROCEDURE openoutput(VAR namebuf: ARRAY OF CHAR);
+  PROCEDURE openoutput(namebuf: ARRAY OF CHAR);
   BEGIN
 	IF (namebuf[1] = '-') AND (namebuf[2] = 0C) THEN
 		CurrOut := Streams.OutputStream;