From 077f43dbe53c80e3edb974454e25c3f0c93d0fd5 Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Fri, 26 Jun 2015 11:58:14 +0300 Subject: Remove support for old-style extensions. --- awk.h | 4 ---- 1 file changed, 4 deletions(-) (limited to 'awk.h') diff --git a/awk.h b/awk.h index 220dba95..0c30cbdc 100644 --- a/awk.h +++ b/awk.h @@ -286,7 +286,6 @@ typedef enum nodevals { Node_param_list, /* lnode is a variable, rnode is more list */ Node_func, /* lnode is param. list, rnode is body */ Node_ext_func, /* extension function, code_ptr is builtin code */ - Node_old_ext_func, /* extension function, code_ptr is builtin code */ Node_builtin_func, /* built-in function, main use is for FUNCTAB */ Node_array_ref, /* array passed by ref as parameter */ @@ -634,7 +633,6 @@ typedef enum opcodeval { Op_builtin, Op_sub_builtin, /* sub, gsub and gensub */ Op_ext_builtin, - Op_old_ext_builtin, /* temporary */ Op_in_array, /* boolean test of membership in array */ /* function call instruction */ @@ -1426,10 +1424,8 @@ extern NODE **r_get_field(NODE *n, Func_ptr *assign, bool reference); /* ext.c */ extern NODE *do_ext(int nargs); void load_ext(const char *lib_name); /* temporary */ -extern NODE *load_old_ext(SRCFILE *s, const char *init_func, const char *fini_func, NODE *obj); extern void close_extensions(void); #ifdef DYNAMIC -extern void make_old_builtin(const char *, NODE *(*)(int), int); extern awk_bool_t make_builtin(const awk_ext_func_t *); extern NODE *get_argument(int); extern NODE *get_actual_argument(int, bool, bool); -- cgit v1.2.3 From 741bf93462919d841ffd7f3ed8c85a202b9dc3f8 Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Sun, 28 Jun 2015 22:21:23 +0300 Subject: Additional memory fixes and test for typedregex. --- awk.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'awk.h') diff --git a/awk.h b/awk.h index 0c30cbdc..53af7f1b 100644 --- a/awk.h +++ b/awk.h @@ -1764,7 +1764,7 @@ static inline NODE * force_string(NODE *s) { if (s->type == Node_typedregex) - return s->re_exp; + return dupnode(s->re_exp); if ((s->flags & STRCUR) != 0 && (s->stfmt == -1 || s->stfmt == CONVFMTidx) -- cgit v1.2.3