summaryrefslogtreecommitdiff
path: root/parser.c
diff options
context:
space:
mode:
Diffstat (limited to 'parser.c')
-rw-r--r--parser.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/parser.c b/parser.c
index a2b045e..3d2bf6f 100644
--- a/parser.c
+++ b/parser.c
@@ -171,6 +171,7 @@ term(void)
case ParenLeftTok:
match(ParenLeftTok);
result = fullterm(ParenRightTok, nil, nil);
+ result->inparens = 1;
match(ParenRightTok);
break;
case StringTok:
@@ -251,7 +252,7 @@ parseoperators(Term *list)
for(i = 0, t = list; i < length; i++){
Operator *op = getoperator(t->text, currentmod);
- if(op && t->tag == AtomTerm){
+ if(op && t->tag == AtomTerm && !t->inparens){
infos[i].type = op->type;
infos[i].level = op->level;
}else{