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

ISO

Browse Source
This commit is contained in:
Vítor Santos Costa 2013-12-20 00:34:15 +00:00
parent 993a9272d1
commit 4612a7cc57
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/write.c
View File

@ -437,7 +437,7 @@ legalAtom(unsigned char *s) /* Is this a legal atom ? */
return (s[1] == '}' && !s[2]); return (s[1] == '}' && !s[2]);
} else if (Yap_chtype[ch] == SL) { } else if (Yap_chtype[ch] == SL) {
return (!s[1]); return (!s[1]);
} else if ((ch == ',' /* || ch == '.' */) && !s[1]) { } else if ((ch == ',' || ch == '.') && !s[1]) {
return FALSE; return FALSE;
} else { } else {
if (ch == '/') { if (ch == '/') {