From 01af531efb161d9768ce61b68e2200b4fab4c00d Mon Sep 17 00:00:00 2001 From: pierre Date: Wed, 20 Nov 2002 22:49:55 +0000 Subject: [PATCH] * commented check code tht was invalid in 1.1 --- compiler/pexpr.pas | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/compiler/pexpr.pas b/compiler/pexpr.pas index 14680f2213..b89cf91be2 100644 --- a/compiler/pexpr.pas +++ b/compiler/pexpr.pas @@ -610,9 +610,9 @@ implementation prevafterassn:=afterassignment; afterassignment:=false; {$ifdef EXTDEBUG} - if assigned(p1) and + { if assigned(p1) and (p1.nodetype<>calln) then - internalerror(20021118); + internalerror(20021118);} {$endif EXTDEBUG} { want we only determine the address of } { a subroutine ? } @@ -2266,7 +2266,10 @@ implementation end. { $Log$ - Revision 1.89 2002-11-18 18:34:41 peter + Revision 1.90 2002-11-20 22:49:55 pierre + * commented check code tht was invalid in 1.1 + + Revision 1.89 2002/11/18 18:34:41 peter * fix crash with EXTDEBUG code Revision 1.88 2002/11/18 17:48:21 peter