From 106f5922d2b1cbdac8aad2f50044f974ff312de9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?= <grubba@grubba.org> Date: Thu, 31 Aug 2000 14:28:06 +0200 Subject: [PATCH] Added ADD_FUNCTION2() and ADD_PROTOTYPE2(). Rev: src/program.h:1.110 --- src/program.h | 22 ++++++++++++++-------- 1 file changed, 14 insertions(+), 8 deletions(-) diff --git a/src/program.h b/src/program.h index f729129bb5..eed7cb4676 100644 --- a/src/program.h +++ b/src/program.h @@ -5,7 +5,7 @@ \*/ /* - * $Id: program.h,v 1.109 2000/08/30 21:58:17 grubba Exp $ + * $Id: program.h,v 1.110 2000/08/31 12:28:06 grubba Exp $ */ #ifndef PROGRAM_H #define PROGRAM_H @@ -509,15 +509,21 @@ void *parent_storage(int depth); OPT_SIDE_EFFECT|OPT_EXTERNAL_DEPEND) #define ADD_PROTOTYPE(NAME, TYPE, FLAGS) \ - quick_add_function(NAME, CONSTANT_STRLEN(NAME), 0, TYPE, \ - CONSTANT_STRLEN(TYPE), FLAGS, \ - OPT_SIDE_EFFECT|OPT_EXTERNAL_DEPEND) + ADD_FUNCTION(NAME, 0, TYPE, FLAGS) + +#define ADD_FUNCTION2(NAME, FUNC, TYPE, FLAGS, OPT_FLAGS) \ + quick_add_function(NAME, CONSTANT_STRLEN(NAME), FUNC, TYPE,\ + CONSTANT_STRLEN(TYPE), FLAGS, OPT_FLAGS) + +#define ADD_PROTOTYPE2(NAME, TYPE, FLAGS, OPT_FLAGS) \ + ADD_FUNCTION2(NAME, 0, TYPE, FLAGS, OPT_FLAGS) -#define ADD_INT_CONSTANT(NAME,CONST,FLAGS) \ - quick_add_integer_constant(NAME,CONSTANT_STRLEN(NAME),CONST,FLAGS) +#define ADD_INT_CONSTANT(NAME, CONST, FLAGS) \ + quick_add_integer_constant(NAME, CONSTANT_STRLEN(NAME), CONST, FLAGS) -#define PIKE_MAP_VARIABLE(NAME,OFFSET,TYPE,RTTYPE,FLAGS) \ - quick_map_variable(NAME,CONSTANT_STRLEN(NAME),OFFSET,TYPE,CONSTANT_STRLEN(TYPE),RTTYPE,FLAGS) +#define PIKE_MAP_VARIABLE(NAME, OFFSET, TYPE, RTTYPE, FLAGS) \ + quick_map_variable(NAME, CONSTANT_STRLEN(NAME), OFFSET, \ + TYPE, CONSTANT_STRLEN(TYPE), RTTYPE, FLAGS) #define ADD_FUNCTION_DTYPE(NAME,FUN,DTYPE,FLAGS) do { \ DTYPE_START; \ -- GitLab