summaryrefslogtreecommitdiff
path: root/xen.h
diff options
context:
space:
mode:
authorAlessio Treglia <quadrispro@ubuntu.com>2010-05-02 22:31:31 +0200
committerAlessio Treglia <quadrispro@ubuntu.com>2010-05-02 22:31:31 +0200
commiteb1f6106a36c100ab25cab7f29045e16f6e967fb (patch)
treee66f81d41fe3107a12b36d56e6aa5b13ea2a3f1a /xen.h
parent08d24d7a5682e59434c3da226fb1f2546c0ebd86 (diff)
Imported Upstream version 11.5
Diffstat (limited to 'xen.h')
-rw-r--r--xen.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/xen.h b/xen.h
index 0247109..30a094a 100644
--- a/xen.h
+++ b/xen.h
@@ -15,6 +15,7 @@
/* HISTORY:
*
+ * 19-Mar: removed s7_define_set_function (removed encapsulation from s7, so it's not useful anymore).
* 17-Feb: various s7 changes.
* 5-Feb-10: XEN_ASSOC_REF and XEN_ASSOC_SET. XEN_ASSOC_REF returns the value, not the key/value pair.
* --------
@@ -1000,7 +1001,7 @@ extern XEN xen_false, xen_true, xen_nil, xen_undefined, xen_zero;
#define XEN_EQ_P(Arg1, Arg2) s7_is_eq(Arg1, Arg2)
#define XEN_EQV_P(Arg1, Arg2) s7_is_eqv(Arg1, Arg2)
-#define XEN_EQUAL_P(Arg1, Arg2) s7_is_equal(Arg1, Arg2)
+#define XEN_EQUAL_P(Arg1, Arg2) s7_is_equal(s7, Arg1, Arg2)
#define XEN_CONS_P(Arg) s7_cons_p(Arg)
#define XEN_CONS(Arg1, Arg2) s7_cons(s7, Arg1, Arg2)
@@ -1375,7 +1376,6 @@ extern XEN xen_false, xen_true, xen_nil, xen_undefined, xen_zero;
#define XEN_DEFINE_PROCEDURE(Name, Func, ReqArg, OptArg, RstArg, Doc) s7_define_function(s7, Name, Func, ReqArg, OptArg, RstArg, Doc)
-#define XEN_DEFINE_SET_PROCEDURE(Name, Func, ReqArg, OptArg, RstArg, Doc) s7_define_set_function(s7, Name, Func, ReqArg, OptArg, RstArg, Doc)
#define XEN_DEFINE_PROCEDURE_STAR(Name, Func, Args, Doc) s7_define_function_star(s7, Name, Func, Args, Doc)
#define XEN_DEFINE_PROCEDURE_WITH_SETTER(Get_Name, Get_Func, Get_Help, Set_Name, Set_Func, Get_Req, Get_Opt, Set_Req, Set_Opt) \
@@ -1407,6 +1407,7 @@ typedef XEN (*XEN_CATCH_BODY_TYPE) (void *dat
#define XEN_DEFINE_CONSTANT(Name, Value, Help) xen_s7_define_constant(s7, Name, s7_make_integer(s7, Value), Help)
#define XEN_DEFINE(Name, Value) s7_define_variable(s7, Name, Value)
+#define XEN_DEFINED_P(Name) s7_is_defined(s7, Name)
#define XEN_DEFINE_VARIABLE(Name, Var, Value) Var = xen_define_variable(Name, Value)
#define XEN_VARIABLE_SET(Var, Val) s7_symbol_set_value(s7, Var, Val)
@@ -1769,7 +1770,6 @@ char *xen_strdup(const char *str);
XEN c_to_xen_off_t(off_t val);
int64_t xen_to_c_int64_t_or_else(XEN obj, int64_t fallback);
int64_t xen_to_c_int64_t(XEN obj);
- #define XEN_DEFINE_SET_PROCEDURE(Name, Func, ReqArg, OptArg, RstArg, Doc) XEN_DEFINE_PROCEDURE(Name, Func, ReqArg, OptArg, RstArg, Doc)
#endif
char *xen_version(void);