strings are atomic!
This commit is contained in:
parent
30be57ed71
commit
3368c84696
2
.gitignore
vendored
2
.gitignore
vendored
@ -92,3 +92,5 @@ CMakeLists.txt.user.4d738ef
|
||||
CMakeLists.txt.user.c65360d
|
||||
|
||||
C/pl-yap.c
|
||||
|
||||
CMakeLists.txt.user
|
||||
|
@ -554,7 +554,7 @@ INLINE_ONLY inline EXTERN Int IsAtomicTerm (Term);
|
||||
INLINE_ONLY inline EXTERN Int
|
||||
IsAtomicTerm (Term t)
|
||||
{
|
||||
return (Int) (IsAtomOrIntTerm (t) || IsLargeNumTerm (t));
|
||||
return (Int) (IsAtomOrIntTerm (t) || IsLargeNumTerm (t) || IsStringTerm(t));
|
||||
}
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user