From a437b627c197003a520acd05cb293a965055291a Mon Sep 17 00:00:00 2001 From: jjgarcia Date: Mon, 17 May 2004 07:43:51 +0000 Subject: [PATCH] C++ does not like to convert function pointers to (void*) --- src/cmp/cmptop.lsp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/cmp/cmptop.lsp b/src/cmp/cmptop.lsp index 2a3c123f0..6cb521970 100644 --- a/src/cmp/cmptop.lsp +++ b/src/cmp/cmptop.lsp @@ -667,11 +667,11 @@ (new-local 0 fun funob) (if macro (if narg - (wt-nl "cl_def_c_macro(" fname "," cfun "," narg ");") - (wt-nl "cl_def_c_macro(" fname "," cfun ",-1);")) + (wt-nl "cl_def_c_macro(" fname ",(void*)" cfun "," narg ");") + (wt-nl "cl_def_c_macro(" fname ",(void*)" cfun ",-1);")) (if narg - (wt-nl "cl_def_c_function(" fname "," cfun "," narg ");") - (wt-nl "cl_def_c_function_va(" fname "," cfun ");"))) + (wt-nl "cl_def_c_function(" fname ",(void*)" cfun "," narg ");") + (wt-nl "cl_def_c_function_va(" fname ",(void*)" cfun ");"))) (close-inline-blocks))) ;;; ----------------------------------------------------------------------