pike.git
/
src
/
docode.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/docode.c:1:
/* || This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: docode.c,v 1.
192
2008/01/28 18:
43
:
14
grubba Exp $
+
|| $Id: docode.c,v 1.
193
2008/01/28 18:
59
:
24
grubba Exp $
*/ #include "global.h" #include "las.h" #include "program.h" #include "pike_types.h" #include "stralloc.h" #include "interpret.h" #include "constants.h" #include "array.h"
pike.git/src/docode.c:637:
emit1 (F_RANGE, bound_types); } static void emit_multi_assign(node *vals, node *vars, int no) { node *var; node *val; node **valp = my_get_arg(&vals, no);
-
fprintf(stderr, "emit_multi_assign(%p, %p)\n", vals, vars);
-
+
if (!vars && (!valp || !*valp)) return; if (!(vars && valp && (val = *valp))) { yyerror("Argument count mismatch for multi-assignment.\n"); return; } if (vars->token == F_LVALUE_LIST) { var = CAR(vars); vars = CDR(vars); } else {