diff options
Diffstat (limited to 'gcc/m2/gm2-compiler/M2Range.mod')
| -rw-r--r-- | gcc/m2/gm2-compiler/M2Range.mod | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/m2/gm2-compiler/M2Range.mod b/gcc/m2/gm2-compiler/M2Range.mod index 347012b..2a5bfab 100644 --- a/gcc/m2/gm2-compiler/M2Range.mod +++ b/gcc/m2/gm2-compiler/M2Range.mod @@ -1257,6 +1257,7 @@ END FoldAssignment ; CheckCancelled - check to see if the range has been cancelled and if so remove quad. *) +(* PROCEDURE CheckCancelled (range: CARDINAL; quad: CARDINAL) ; BEGIN IF IsCancelled (range) @@ -1264,6 +1265,7 @@ BEGIN SubQuad (quad) END END CheckCancelled ; +*) (* |