From 5ce8d637efe7f13a147fa72dd576734f11c74741 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Thu, 3 Nov 2011 07:54:18 +0900 Subject: [PATCH] fix AtomLength clash --- H/pl-yap.h | 3 +++ 1 file changed, 3 insertions(+) diff --git a/H/pl-yap.h b/H/pl-yap.h index f49693148..b474639f2 100644 --- a/H/pl-yap.h +++ b/H/pl-yap.h @@ -124,6 +124,9 @@ void PL_license(const char *license, const char *module); #define isVar(A) YAP_IsVarTerm((A)) #define valReal(w) YAP_FloatOfTerm((w)) #define valFloat(w) YAP_FloatOfTerm((w)) +#ifdef AtomLength /* there is another AtomLength in the system */ +#undef AtomLength +#endif #define AtomLength(w) YAP_AtomNameLength(w) #define atomValue(atom) YAP_AtomFromSWIAtom(atom) #define atomFromTerm(term) YAP_SWIAtomFromAtom(YAP_AtomOfTerm(term))