comparison mc-macro.c @ 527:6b0fd56848e6 inline-asm

inline continue.... asm, lvar free
author kono
date Wed, 28 Dec 2005 21:21:57 +0900
parents e58848f6ebc1
children 0f24e1dba811
comparison
equal deleted inserted replaced
526:9ff5cd7afe2f 527:6b0fd56848e6
17 static void macro_define0(); 17 static void macro_define0();
18 static int macro_args(char **pchptr); 18 static int macro_args(char **pchptr);
19 static int macro_function(int macrop,char **pchptr,NMTBL *nptr,int history); 19 static int macro_function(int macrop,char **pchptr,NMTBL *nptr,int history);
20 static void local_define(char *macro,char *value); 20 static void local_define(char *macro,char *value);
21 static int macro_eval(int macrop,char *body0,int history); 21 static int macro_eval(int macrop,char *body0,int history);
22 static char * mappend(int lists,char **result); 22 extern char * mappend(int lists,char **result);
23 static int macro_processing(); 23 static int macro_processing();
24 24
25 static void 25 static void
26 gen_source(char *s) 26 gen_source(char *s)
27 { 27 {
786 /* 786 /*
787 cancat list2("string",next) into cheap. 787 cancat list2("string",next) into cheap.
788 result overwrited by next cheap allocation 788 result overwrited by next cheap allocation
789 */ 789 */
790 790
791 static char * 791 extern char *
792 mappend(int lists,char **result) 792 mappend(int lists,char **result)
793 { 793 {
794 char *p; 794 char *p;
795 *result = cheap->ptr; 795 *result = cheap->ptr;
796 for(;lists;lists = cadr(lists)) { 796 for(;lists;lists = cadr(lists)) {