diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix singletons _

Browse Source
This commit is contained in:
Vítor Santos Costa 2013-11-21 22:48:27 +00:00
parent 7c48eb8ff7
commit 02526db2d1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/parser.c
View File

@ -214,7 +214,7 @@ static Term
Singletons(VarEntry *p,Term l USES_REGS) Singletons(VarEntry *p,Term l USES_REGS)
{ {
if (p != NULL) { if (p != NULL) {
if (strcmp(p->VarRep, "_") != 0 && p->refs == 1) { if (p->VarRep && p->VarRep[0] != '_' && p->refs == 1) {
Term t[2]; Term t[2];
Term o; Term o;