From 19b0c2a0b073e27398211f8edb902575b4622d4e Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 19 Aug 1987 18:07:01 +0000 Subject: [PATCH] disabled range-checks --- lang/m2/libm2/CSP.mod | 1 + lang/m2/libm2/Conversion.mod | 1 + lang/m2/libm2/InOut.mod | 1 + lang/m2/libm2/MathLib0.mod | 1 + lang/m2/libm2/Mathlib.mod | 1 + lang/m2/libm2/PascalIO.mod | 1 + lang/m2/libm2/Processes.mod | 1 + lang/m2/libm2/RealConver.mod | 1 + lang/m2/libm2/RealInOut.mod | 1 + lang/m2/libm2/Semaphores.mod | 1 + lang/m2/libm2/Storage.mod | 1 + lang/m2/libm2/Strings.mod | 1 + lang/m2/libm2/TTY.mod | 1 + lang/m2/libm2/Terminal.mod | 1 + lang/m2/libm2/Traps.mod | 1 + lang/m2/libm2/random.mod | 1 + 16 files changed, 16 insertions(+) diff --git a/lang/m2/libm2/CSP.mod b/lang/m2/libm2/CSP.mod index ee723cbcd..147780639 100644 --- a/lang/m2/libm2/CSP.mod +++ b/lang/m2/libm2/CSP.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE CSP; (* From "A Modula-2 Implementation of CSP", diff --git a/lang/m2/libm2/Conversion.mod b/lang/m2/libm2/Conversion.mod index 95215de0f..1bf1f43ca 100644 --- a/lang/m2/libm2/Conversion.mod +++ b/lang/m2/libm2/Conversion.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Conversions; PROCEDURE ConvertNum(num, len, base: CARDINAL; diff --git a/lang/m2/libm2/InOut.mod b/lang/m2/libm2/InOut.mod index 1312ba4bc..50b69ed55 100644 --- a/lang/m2/libm2/InOut.mod +++ b/lang/m2/libm2/InOut.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE InOut ; IMPORT Unix; diff --git a/lang/m2/libm2/MathLib0.mod b/lang/m2/libm2/MathLib0.mod index 8c43275c3..9caf5b19b 100644 --- a/lang/m2/libm2/MathLib0.mod +++ b/lang/m2/libm2/MathLib0.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE MathLib0; IMPORT Mathlib; diff --git a/lang/m2/libm2/Mathlib.mod b/lang/m2/libm2/Mathlib.mod index 274550dfb..79858a34f 100644 --- a/lang/m2/libm2/Mathlib.mod +++ b/lang/m2/libm2/Mathlib.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Mathlib; FROM EM IMPORT FIF, FEF; diff --git a/lang/m2/libm2/PascalIO.mod b/lang/m2/libm2/PascalIO.mod index c09e1d95b..f97ec5d31 100644 --- a/lang/m2/libm2/PascalIO.mod +++ b/lang/m2/libm2/PascalIO.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE PascalIO; IMPORT Unix; diff --git a/lang/m2/libm2/Processes.mod b/lang/m2/libm2/Processes.mod index 23ebc8f8b..2bc5d66d8 100644 --- a/lang/m2/libm2/Processes.mod +++ b/lang/m2/libm2/Processes.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Processes [1]; (* This implementation module comes from "Programming in Modula-2", by Niklaus Wirth, diff --git a/lang/m2/libm2/RealConver.mod b/lang/m2/libm2/RealConver.mod index 9c0522e74..71f26b833 100644 --- a/lang/m2/libm2/RealConver.mod +++ b/lang/m2/libm2/RealConver.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE RealConversions; FROM EM IMPORT FIF, FEF; diff --git a/lang/m2/libm2/RealInOut.mod b/lang/m2/libm2/RealInOut.mod index d45ad6f9b..430678a6e 100644 --- a/lang/m2/libm2/RealInOut.mod +++ b/lang/m2/libm2/RealInOut.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE RealInOut; IMPORT InOut; diff --git a/lang/m2/libm2/Semaphores.mod b/lang/m2/libm2/Semaphores.mod index 8f3bf8005..96fc2482b 100644 --- a/lang/m2/libm2/Semaphores.mod +++ b/lang/m2/libm2/Semaphores.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Semaphores [1]; FROM SYSTEM IMPORT ADDRESS, NEWPROCESS, TRANSFER; diff --git a/lang/m2/libm2/Storage.mod b/lang/m2/libm2/Storage.mod index b352fc2ee..0779d3d00 100644 --- a/lang/m2/libm2/Storage.mod +++ b/lang/m2/libm2/Storage.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Storage; (* This storage manager maintains an array of lists of objects with the same size. Commonly used sizes have their own bucket. The larger ones diff --git a/lang/m2/libm2/Strings.mod b/lang/m2/libm2/Strings.mod index 54179afff..5639a7f67 100644 --- a/lang/m2/libm2/Strings.mod +++ b/lang/m2/libm2/Strings.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Strings; PROCEDURE Assign(source: ARRAY OF CHAR; VAR dest: ARRAY OF CHAR); diff --git a/lang/m2/libm2/TTY.mod b/lang/m2/libm2/TTY.mod index c330183d6..f45e5e9fd 100644 --- a/lang/m2/libm2/TTY.mod +++ b/lang/m2/libm2/TTY.mod @@ -1,4 +1,5 @@ # +(*$R-*) IMPLEMENTATION MODULE TTY; FROM Unix IMPORT ioctl; FROM SYSTEM IMPORT ADR; diff --git a/lang/m2/libm2/Terminal.mod b/lang/m2/libm2/Terminal.mod index d53b792b4..2c905a2a1 100644 --- a/lang/m2/libm2/Terminal.mod +++ b/lang/m2/libm2/Terminal.mod @@ -1,4 +1,5 @@ # +(*$R-*) IMPLEMENTATION MODULE Terminal; (* This implementation is Unix-dependant *) diff --git a/lang/m2/libm2/Traps.mod b/lang/m2/libm2/Traps.mod index 028db858b..2e8f9ff25 100644 --- a/lang/m2/libm2/Traps.mod +++ b/lang/m2/libm2/Traps.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE Traps; IMPORT EM; IMPORT Unix; diff --git a/lang/m2/libm2/random.mod b/lang/m2/libm2/random.mod index 86c2a65ee..ca6fb3401 100644 --- a/lang/m2/libm2/random.mod +++ b/lang/m2/libm2/random.mod @@ -1,3 +1,4 @@ +(*$R-*) IMPLEMENTATION MODULE random; FROM Unix IMPORT getpid, time; -- 2.34.1