From e16486a958001dee80b1e5f7023ccde9552325d9 Mon Sep 17 00:00:00 2001 From: peter Date: Sat, 6 Jan 2001 18:28:39 +0000 Subject: [PATCH] * fixed wrong notes about locals --- compiler/ninl.pas | 9 ++++++--- compiler/nmat.pas | 7 +++++-- 2 files changed, 11 insertions(+), 5 deletions(-) diff --git a/compiler/ninl.pas b/compiler/ninl.pas index aab9867f03..b66208d80c 100644 --- a/compiler/ninl.pas +++ b/compiler/ninl.pas @@ -678,7 +678,7 @@ implementation exit; { last param must be var } valid_for_assign(ppn.left,false); - set_varstate(ppn.left,true); + set_varstate(ppn.left,false); { first param must be a string or dynamic array ...} if not((ppn.left.resulttype^.deftype=stringdef) or (is_dynamic_array(ppn.left.resulttype))) then @@ -1495,7 +1495,7 @@ implementation inherited docompare(p) and (inlinenumber = tinlinenode(p).inlinenumber); end; - + begin @@ -1503,7 +1503,10 @@ begin end. { $Log$ - Revision 1.22 2000-12-31 11:14:10 jonas + Revision 1.23 2001-01-06 18:28:39 peter + * fixed wrong notes about locals + + Revision 1.22 2000/12/31 11:14:10 jonas + implemented/fixed docompare() mathods for all nodes (not tested) + nopt.pas, nadd.pas, i386/n386opt.pas: optimized nodes for adding strings and constant strings/chars together diff --git a/compiler/nmat.pas b/compiler/nmat.pas index 8c2a56e751..a45a256b88 100644 --- a/compiler/nmat.pas +++ b/compiler/nmat.pas @@ -80,7 +80,7 @@ implementation begin pass_1:=nil; firstpass(left); - set_varstate(right,true); + set_varstate(left,true); firstpass(right); set_varstate(right,true); if codegenerror then @@ -528,7 +528,10 @@ begin end. { $Log$ - Revision 1.12 2001-01-05 17:36:57 florian + Revision 1.13 2001-01-06 18:28:39 peter + * fixed wrong notes about locals + + Revision 1.12 2001/01/05 17:36:57 florian * the info about exception frames is stored now on the stack instead on the heap