diff options
-rw-r--r-- | lisp/core.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/core.c b/lisp/core.c index 89f5d5c..a9792e9 100644 --- a/lisp/core.c +++ b/lisp/core.c @@ -4308,6 +4308,11 @@ Lisp_Pushnew(LispBuiltin *builtin) return (result); } +#ifdef __SUNPRO_C +/* prevent "Function has no return statement" error for Lisp_Quit */ +#pragma does_not_return(exit) +#endif + LispObj * Lisp_Quit(LispBuiltin *builtin) /* |