Ignore:
Timestamp:
Oct 22, 2010, 3:39:58 PM (14 years ago)
Author:
george
Message:
  • Modified: Better parse righ assignment side with expression.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/Transpascal/Compiler/Produce/UProducerAsm8051.pas

    r60 r80  
    155155    ntNone: ;
    156156    ntVariable: if Assigned(Variable) then AddInstruction('', 'GETVAR', Variable.Name, '');
    157     nTFunction: AddInstruction('', 'CALL', Method.Name, '');
     157    nTFunction: AddInstruction('', 'CALL', FunctionCall.Name, '');
    158158    ntConstant: AddInstruction('', 'CONST', '', '');
    159159    ntOperator: begin
Note: See TracChangeset for help on using the changeset viewer.