diff options
Diffstat (limited to 'Examples/test-suite/guile/guile_ext_test_external.cxx')
-rw-r--r-- | Examples/test-suite/guile/guile_ext_test_external.cxx | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Examples/test-suite/guile/guile_ext_test_external.cxx b/Examples/test-suite/guile/guile_ext_test_external.cxx index c4f906a97..2729537bd 100644 --- a/Examples/test-suite/guile/guile_ext_test_external.cxx +++ b/Examples/test-suite/guile/guile_ext_test_external.cxx @@ -19,6 +19,6 @@ SCM test_create() SCM test_is_pointer(SCM val) { #define FUNC_NAME "test-is-pointer" - return SCM_BOOL(SWIG_IsPointer(val)); + return scm_from_bool(SWIG_IsPointer(val)); #undef FUNC_NAME } |