vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 02:52:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

silences clang warnings of type "place parentheses around the '&' expression". small fix in OPV to

Browse source 
make it
This commit is contained in:
Norayr Chilingarian 2014-04-10 17:51:05 +04:00
parent b25a810007
commit f066c42eb9
4 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
showdef
View file

Binary file not shown.

4
src/voc/OPV.Mod
View file

@ -698,6 +698,7 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96
expr(r, exprPrec) expr(r, exprPrec)
END END
ELSE ELSE
IF (subclass = and) OR ((form = Set) & ((subclass = times) OR (subclass = minus))) THEN OPM.Write(OpenParen); END; (* to silence clang warnings; -- noch *)
expr(l, exprPrec); expr(l, exprPrec);
CASE subclass OF CASE subclass OF
times: times:
@ -724,7 +725,8 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96
| or: | or:
OPM.WriteString(" || ") OPM.WriteString(" || ")
END; END;
expr(r, exprPrec) expr(r, exprPrec);
IF (subclass = and) OR ((form = Set) & ((subclass = times) OR (subclass = minus))) THEN OPM.Write(CloseParen) END; (* to silence clang warnings, -- noch*)
END END
| Ncall: | Ncall:
IF (l^.obj # NIL) & (l^.obj^.mode = TProc) THEN IF (l^.obj # NIL) & (l^.obj^.mode = TProc) THEN

BIN
voc
View file

Binary file not shown.

BIN
vocstatic.linux.clang.x86_64
View file

Binary file not shown.