fix bad SMOB code in logical.c, make sure to fix the correct match reference in guile-log.scm

parent e38d04c8
Prerequisits
This is a draft for guile-2.0.6 and later and works for linux.
You need to have guile-syntax-parse installed
......
(define-module (logic guile-log)
#:use-module (system base compile)
#:use-module (ice-9 match-phd)
#:use-module (ice-9 match-phd-lookup)
#:use-module (logic guile-log guile-log-pre)
#:use-module (logic guile-log umatch)
#:use-module (ice-9 pretty-print)
......
......@@ -18,8 +18,7 @@ inline SCM get_gp_key(SCM *id)
SCM make_logical()
{
SCM ret,*id;
ret = SCM_NEWSMOB(ret,GP_MK_FRAME_UNBD(gp_type),
(void*)0);
SCM_NEWSMOB(ret,GP_MK_FRAME_UNBD(gp_type), (void*)0);
id = GP_GETREF(ret);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment