Error Handler
This commit is contained in:
@@ -38,9 +38,10 @@
|
||||
|
||||
struct yami *Yap_Error__(const char *file, const char *function, int lineno, yap_error_number err,YAP_Term wheret, ...);
|
||||
|
||||
#define Yap_Error( id, t, ...) Yap_Error__(__FILE__, __FUNCTION__, __LINE__, id, t, __VA_ARGS__)
|
||||
#define Yap_NilError( id, ...) Yap_Error__(__FILE__, __FUNCTION__, __LINE__, id, TermNil, __VA_ARGS__)
|
||||
|
||||
#define Yap_Error( id, inp, ...) Yap_Error__(__FILE__, __FUNCTION__, __LINE__, id, inp, __VA_ARGS__)
|
||||
|
||||
|
||||
#define JMP_LOCAL_ERROR(v, LAB) \
|
||||
if (H + 2 * (v) > ASP - 1024) { \
|
||||
|
@@ -1899,9 +1899,9 @@ extern X_API void YAP_Write(YAP_Term t,FILE *s,int);
|
||||
|
||||
extern X_API FILE * YAP_TermToStream(YAP_Term t);
|
||||
|
||||
extern X_API int YAP_InitConsult(int mode, const char *filename);
|
||||
extern X_API int YAP_InitConsult(int mode, const char *filename, int *previous_sno);
|
||||
|
||||
extern X_API void YAP_EndConsult(int s);
|
||||
extern X_API void YAP_EndConsult(int s, int *previous_sno);
|
||||
|
||||
#ifndef _PL_STREAM_H
|
||||
// if we don't know what a stream is, just don't assume nothing about the pointer
|
||||
|
Reference in New Issue
Block a user