fix comparsion with wide/unwide characters

This commit is contained in:
Vitor Santos Costa 2012-10-29 09:43:05 +00:00
parent 68547e1abf
commit f7493e0de6
1 changed files with 4 additions and 0 deletions

View File

@ -57,6 +57,8 @@ cmp_atoms(Atom a1, Atom a2)
while (*s1 == *s2) {
if (!*s1) return 0;
s1++;
s2++;
}
return *s1-*s2;
}
@ -67,6 +69,8 @@ cmp_atoms(Atom a1, Atom a2)
while (*s1 == *s2) {
if (!*s1) return 0;
s1++;
s2++;
}
return *s1-*s2;
} else {