aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGaius Mulley <gaiusmod2@gmail.com>2023-02-06 21:14:32 +0000
committerGaius Mulley <gaiusmod2@gmail.com>2023-02-06 21:14:32 +0000
commitd5f933d2c046478c05b463be23021875d08dc647 (patch)
tree425e8a69bfdb187b7136e18bcac612b8546e44f0
parent9f4baed6ac02f721f1adee043c4aa920dd5075b7 (diff)
downloadgcc-d5f933d2c046478c05b463be23021875d08dc647.zip
gcc-d5f933d2c046478c05b463be23021875d08dc647.tar.gz
gcc-d5f933d2c046478c05b463be23021875d08dc647.tar.bz2
Modula2 meets clang [PR108135]
Remove unused function (and build warnings). gcc/m2/ChangeLog: * gm2-compiler/M2Search.mod (DSdbEnter): Comment out. (DSdbExit): Comment out. PR modula2/108135 Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
-rw-r--r--gcc/m2/gm2-compiler/M2Search.mod5
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/m2/gm2-compiler/M2Search.mod b/gcc/m2/gm2-compiler/M2Search.mod
index cc61ebf..9c78c80 100644
--- a/gcc/m2/gm2-compiler/M2Search.mod
+++ b/gcc/m2/gm2-compiler/M2Search.mod
@@ -81,16 +81,18 @@ END doDSdbExit ;
doDSsbEnter when debugging garbage collection at runtime.
*)
+(*
PROCEDURE DSdbEnter ;
BEGIN
END DSdbEnter ;
-
+*)
(*
DSdbExit - dummy nop exit code which the preprocessor replaces by
doDSsbExit when debugging garbage collection at runtime.
*)
+(*
PROCEDURE DSdbExit (s: String) ;
BEGIN
IF GarbageDebugging
@@ -98,6 +100,7 @@ BEGIN
Assert (s # NIL)
END
END DSdbExit ;
+*)
(*