pike.git/
src/
builtin_functions.c
Branch:
Tag:
Non-build tags
All tags
No tags
2001-01-03
2001-01-03 20:29:28 by Martin Stjernholm <mast@lysator.liu.se>
050df7dd3ef0a28d35f3aa32b9b2412ef53deb23 (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
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 );