Apple-2gs-SW/ORCA-C
1
0
Fork 0
mirror of https://github.com/byteworksinc/ORCA-C.git synced 2024-06-15 23:29:44 +00:00
Code Issues Projects Releases Wiki Activity

Remove bogus code for applying unary &, ++, and -- operators to integer constants.

Browse Source 
This is already precluded from executing by an earlier test, so there is no functional change.
This commit is contained in:
Stephen Heumann 2016-12-20 21:13:14 -06:00
parent 7ab1875b54
commit cd9a424499
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Expression.pas
View File

@ -1311,17 +1311,12 @@ var
dispose(op^.left);
op^.left := nil;
case op^.token.kind of
opplusplus, {posfix ++}
plusplusop : op1 := op1+1; {prefix ++}
opminusminus, {postfix --}
minusminusop: op1 := op1-1; {prefix --}
tildech : op1 := ~op1; {~}
excch : begin {!}
op1 := ord(op1 = 0);
ekind := intconst;
end;
uminus : op1 := -op1; {unary -}
uand : op1 := 0; {unary &}
uasterisk : Error(79); {unary *}
otherwise: Error(57);
end; {case}