init and new text size function

This commit is contained in:
Vítor Santos Costa 2015-11-05 19:27:34 +00:00
parent df273f549a
commit 5f58216315

View File

@ -484,7 +484,7 @@ static inline Term Yap_AtomToNumber(Term t0 USES_REGS) {
inp.type = YAP_STRING_ATOM;
out.val.uc = NULL;
out.type =
YAP_STRING_INT | YAP_STRING_FLOAT | YAP_STRING_BIG | YAP_STRING_TERM;
YAP_STRING_INT | YAP_STRING_FLOAT | YAP_STRING_BIG;
if (!Yap_CVT_Text(&inp, &out PASS_REGS))
return 0L;
return out.val.t;