diff --git a/showdef b/showdef index b8912125..4b540a37 100755 Binary files a/showdef and b/showdef differ diff --git a/src/voc/OPV.Mod b/src/voc/OPV.Mod index faf311c4..18dbca58 100644 --- a/src/voc/OPV.Mod +++ b/src/voc/OPV.Mod @@ -698,6 +698,7 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96 expr(r, exprPrec) END 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); CASE subclass OF times: @@ -724,7 +725,8 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96 | or: OPM.WriteString(" || ") 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 | Ncall: IF (l^.obj # NIL) & (l^.obj^.mode = TProc) THEN diff --git a/voc b/voc index 675d9ee5..ce94362b 100755 Binary files a/voc and b/voc differ diff --git a/vocstatic.linux.clang.x86_64 b/vocstatic.linux.clang.x86_64 index 675d9ee5..ce94362b 100755 Binary files a/vocstatic.linux.clang.x86_64 and b/vocstatic.linux.clang.x86_64 differ