Stop assuming no-debug-info functions return int

[thirdparty/binutils-gdb.git] / gdb / guile / scm-value.c

diff --git a/gdb/guile/scm-value.c b/gdb/guile/scm-value.c
index f63103227cef7b35d1c9813708925f945b59d2fd..0dc66302ed3f6fa3bda237d46b0e4fe0e51b8826 100644 (file)
--- a/gdb/guile/scm-value.c
+++ b/gdb/guile/scm-value.c
@@ -864,7 +864,7 @@ gdbscm_value_call (SCM self, SCM args)
       struct cleanup *cleanup = make_cleanup_value_free_to_mark (mark);
       struct value *return_value;
 
-      return_value = call_function_by_hand (function, args_count, vargs);
+      return_value = call_function_by_hand (function, NULL, args_count, vargs);
       result = vlscm_scm_from_value (return_value);
       do_cleanups (cleanup);
     }