From 4530233a92d2204d3b9b13d79f978ea91a89be71 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Sat, 3 Mar 2001 12:38:33 +0000 Subject: [PATCH] + support for arraydefs in is_signed (for their rangetype, used in rangechecks) --- compiler/types.pas | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/compiler/types.pas b/compiler/types.pas index 46c51184a6..3274cd46ec 100644 --- a/compiler/types.pas +++ b/compiler/types.pas @@ -549,6 +549,8 @@ implementation end; enumdef : is_signed:=penumdef(def)^.min < 0; + arraydef : + is_signed:=is_signed(parraydef(def)^.rangetype.def); else is_signed:=false; end; @@ -1741,7 +1743,10 @@ implementation end. { $Log$ - Revision 1.34 2001-02-26 19:44:55 peter + Revision 1.35 2001-03-03 12:38:33 jonas + + support for arraydefs in is_signed (for their rangetype, used in rangechecks) + + Revision 1.34 2001/02/26 19:44:55 peter * merged generic m68k updates from fixes branch Revision 1.33 2001/02/26 12:47:46 jonas