unused
This commit is contained in:
parent
1ead544a50
commit
269e7b8806
@ -704,13 +704,6 @@ restart_aux:
|
||||
cut_fail();
|
||||
}
|
||||
|
||||
#define CastToAtom(x) CastToAtom__(x PASS_REGS)
|
||||
|
||||
static Term CastToAtom__(Term t USES_REGS) {
|
||||
if (IsAtomTerm(t))
|
||||
return t;
|
||||
return MkAtomTerm(Yap_AtomicToAtom(t PASS_REGS));
|
||||
}
|
||||
|
||||
#define CastToNumeric(x) CastToNumeric__(x PASS_REGS)
|
||||
|
||||
|
Reference in New Issue
Block a user