fix ) in arity 0 predicates

This commit is contained in:
Vítor Santos Costa 2008-09-23 22:49:44 +01:00
parent 895e29d444
commit 1e8de3f86c
1 changed files with 3 additions and 1 deletions

View File

@ -81,7 +81,9 @@ send_tracer_message(char *start, char *name, Int arity, char *mname, CELL *args)
#endif
#endif
}
fprintf(Yap_stderr, ")");
if (arity) {
fprintf(Yap_stderr, ")");
}
}
}
fprintf(Yap_stderr, "\n");