allow writing of opaque terms.

This commit is contained in:
Vitor Santos Costa
2011-07-27 16:50:14 +01:00
parent b79a885480
commit 619d0622e6
4 changed files with 75 additions and 6 deletions

View File

@@ -205,12 +205,14 @@ typedef int (*YAP_agc_hook)(void *_Atom);
typedef void (*YAP_halt_hook)(int exit_code, void *closure);
typedef int YAP_opaque_tag_t;
typedef YAP_Int YAP_opaque_tag_t;
typedef int (*YAP_Opaque_CallOnFail)(void *);
typedef int (*YAP_Opaque_CallOnWrite)(void *, YAP_opaque_tag_t, void *, int);
typedef struct YAP_opaque_handler_struct {
YAP_Opaque_CallOnFail fail_handler;
YAP_Opaque_CallOnFail fail_handler;
YAP_Opaque_CallOnWrite write_handler;
} YAP_opaque_handler_t;
/********* execution mode ***********************/