diff options
| author | Peter Stephenson <pws@users.sourceforge.net> | 2011-06-19 20:12:00 +0000 |
|---|---|---|
| committer | Peter Stephenson <pws@users.sourceforge.net> | 2011-06-19 20:12:00 +0000 |
| commit | 6062529d3fc7c7d29c63d0726d2449d4b56f33ac (patch) | |
| tree | 8131c4e1678053413559fe71159201f891786a70 /Src/parse.c | |
| parent | 437d5d98f6d05588e23a6d9fda50184d0b6a80bb (diff) | |
| download | zsh-6062529d3fc7c7d29c63d0726d2449d4b56f33ac.tar.gz zsh-6062529d3fc7c7d29c63d0726d2449d4b56f33ac.tar.xz zsh-6062529d3fc7c7d29c63d0726d2449d4b56f33ac.zip | |
29492: add argument handling to anonymous functions
Diffstat (limited to 'Src/parse.c')
| -rw-r--r-- | Src/parse.c | 30 |
1 files changed, 28 insertions, 2 deletions
diff --git a/Src/parse.c b/Src/parse.c index 4720dc3cf..5b6f09949 100644 --- a/Src/parse.c +++ b/Src/parse.c @@ -1480,12 +1480,25 @@ par_funcdef(void) ecbuf[p + num + 4] = ecnpats; ecbuf[p + 1] = num; - lineno += oldlineno; ecnpats = onp; ecssub = oecssub; ecnfunc++; ecbuf[p] = WCB_FUNCDEF(ecused - 1 - p); + + if (num == 0) { + /* Unnamed function */ + int parg = ecadd(0); + ecadd(0); + while (tok == STRING) { + ecstr(tokstr); + num++; + zshlex(); + } + ecbuf[parg] = ecused - parg; /*?*/ + ecbuf[parg+1] = num; + } + lineno += oldlineno; } /* @@ -1730,13 +1743,26 @@ par_simple(int *complex, int nr) ecbuf[p + argc + 3] = ecsoffs - so; ecbuf[p + argc + 4] = ecnpats; - lineno += oldlineno; ecnpats = onp; ecssub = oecssub; ecnfunc++; ecbuf[p] = WCB_FUNCDEF(ecused - 1 - p); + if (argc == 0) { + /* Unnamed function */ + int parg = ecadd(0); + ecadd(0); + while (tok == STRING) { + ecstr(tokstr); + argc++; + zshlex(); + } + ecbuf[parg] = ecused - parg; /*?*/ + ecbuf[parg+1] = argc; + } + lineno += oldlineno; + isfunc = 1; isnull = 0; break; |