Changeset 145 for branches/easy compiler/UCompiler.pas
- Timestamp:
- Jan 17, 2018, 1:11:56 PM (7 years ago)
- Location:
- branches/easy compiler
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/easy compiler
- Property svn:ignore
-
old new 2 2 *.exe 3 3 *.lps 4 heaptrclog.trc
-
- Property svn:ignore
-
branches/easy compiler/UCompiler.pas
r142 r145 262 262 for Param in Funct.Parameters do 263 263 if Param.Kind = pkString then begin 264 TSourceFunctionCall(Instruction). AddParameter(ParseReference)264 TSourceFunctionCall(Instruction).Parameters.Add(ParseReference) 265 265 end else 266 266 if Param.Kind = pkVariable then begin 267 TSourceFunctionCall(Instruction). AddParameter(ParseReferenceVariable(True));267 TSourceFunctionCall(Instruction).Parameters.Add(ParseReferenceVariable(True)); 268 268 end else 269 269 raise Exception.Create('Unsupported parameter type.');
Note:
See TracChangeset
for help on using the changeset viewer.