strings are atomic!

This commit is contained in:
Vítor Santos Costa 2015-10-13 02:15:32 +01:00
parent 30be57ed71
commit 3368c84696
2 changed files with 3 additions and 1 deletions

2
.gitignore vendored
View File

@ -92,3 +92,5 @@ CMakeLists.txt.user.4d738ef
CMakeLists.txt.user.c65360d
C/pl-yap.c
CMakeLists.txt.user

View File

@ -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));
}