ISO support (Paulo Moura).

2014-10-21 00:26:40 +01:00
parent a4081673e5
commit ffb97269a0
2 changed files with 3 additions and 3 deletions
--- a/C/atomic.c
+++ b/C/atomic.c
@@ -506,7 +506,7 @@ p_number_chars( USES_REGS1 )
      return Yap_unify( ARG1, tf );
  }
  /* error handling */
-  if (LOCAL_Error_TYPE && Yap_HandleError( "atom_chars/2" )) {
+  if (LOCAL_Error_TYPE && Yap_HandleError( "number_chars/2" )) {
    goto restart_aux;
  }
  return FALSE;