# HG changeset patch # User Gerd Moellmann # Date 937787681 0 # Node ID 4399d55899d3efe8c5cfbc175dd80d4236f59c67 # Parent 2cd7c31ce9821b30a317c6bcf7806a67bbd70d43 (RETURN_UNGCPRO): Use do-while (0) idiom. (toplevel): Add prototypes for stuff_char, and code_convert_string_norecord. diff -r 2cd7c31ce982 -r 4399d55899d3 src/lisp.h --- a/src/lisp.h Mon Sep 20 00:34:37 1999 +0000 +++ b/src/lisp.h Mon Sep 20 00:34:41 1999 +0000 @@ -1600,14 +1600,14 @@ /* Evaluate expr, UNGCPRO, and then return the value of expr. */ #define RETURN_UNGCPRO(expr) \ -if (1) \ +do \ { \ Lisp_Object ret_ungc_val; \ ret_ungc_val = (expr); \ UNGCPRO; \ return ret_ungc_val; \ } \ -else +while (0) /* Declare a Lisp-callable function. The MAXARGS parameter has the same meaning as in the DEFUN macro, and is used to construct a prototype. */ @@ -1768,6 +1768,8 @@ extern void init_coding P_ ((void)); extern void init_coding_once P_ ((void)); extern void syms_of_coding P_ ((void)); +extern Lisp_Object code_convert_string_norecord P_ ((Lisp_Object, Lisp_Object, + int)); /* Defined in charset.c */ extern int nonascii_insert_offset; @@ -2601,6 +2603,7 @@ extern void syms_of_xmenu P_ ((void)); /* defined in sysdep.c */ +extern void stuff_char P_ ((char c)); extern void init_sigio P_ ((int)); extern void request_sigio P_ ((void)); extern void unrequest_sigio P_ ((void));