rc

[fork] interactive rc shell
Log | Files | Refs | README | LICENSE

commit 414214273ddec72752c2621334dc864bb9d25191
parent 92f004d552441f0ff1fdc1e802520422117f0444
Author: tgoodwin <tgoodwin>
Date:   Wed,  8 Jul 1998 16:58:43 +0000

we have to call it rc_Function to avoid clash with readline

Diffstat:
Mfn.c | 8++++----
1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/fn.c b/fn.c @@ -143,7 +143,7 @@ static void dud_handler(int s) { extern void fnassign(char *name, Node *def) { Node *newdef = treecpy(def == NULL ? &null : def, ealloc); /* important to do the treecopy first */ - Function *new = get_fn_place(name); + rc_Function *new = get_fn_place(name); int i; new->def = newdef; new->extdef = NULL; @@ -170,7 +170,7 @@ extern void fnassign(char *name, Node *def) { extern void fnassign_string(char *extdef) { char *name = get_name(extdef+3); /* +3 to skip over "fn_" */ - Function *new; + rc_Function *new; if (name == NULL) return; new = get_fn_place(name); @@ -181,7 +181,7 @@ extern void fnassign_string(char *extdef) { /* Return a function in Node form, evaluating an entry from the environment if necessary */ extern Node *fnlookup(char *name) { - Function *look = lookup_fn(name); + rc_Function *look = lookup_fn(name); Node *ret; if (look == NULL) return NULL; /* not found */ @@ -202,7 +202,7 @@ extern Node *fnlookup(char *name) { /* Return a function in string form (used by makeenv) */ extern char *fnlookup_string(char *name) { - Function *look = lookup_fn(name); + rc_Function *look = lookup_fn(name); if (look == NULL) return NULL;