Branch: Tag:

2001-01-03

2001-01-03 20:29:28 by Martin Stjernholm <mast@lysator.liu.se>

Fixed cut'n'paste bug.

Rev: src/builtin_functions.c:1.326

5:   \*/   /**/   #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.325 2000/12/18 21:38:00 grubba Exp $"); + RCSID("$Id: builtin_functions.c,v 1.326 2001/01/03 20:29:28 mast Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
4245:    if( args != 2 )    SIMPLE_TOO_FEW_ARGS_ERROR("permute", 2);    if( Pike_sp[ -2 ].type != T_ARRAY ) -  SIMPLE_BAD_ARG_ERROR("diff", 1, "array"); +  SIMPLE_BAD_ARG_ERROR("permute", 1, "array");    if (Pike_sp[ -1 ].type != T_INT) -  SIMPLE_BAD_ARG_ERROR("diff", 2, "int"); +  SIMPLE_BAD_ARG_ERROR("permute", 2, "int");       n = Pike_sp[ -1 ].u.integer;    a = copy_array( Pike_sp[ -2 ].u.array );