pike.git/
src/
builtin_functions.c
Branch:
Tag:
Non-build tags
All tags
No tags
1998-07-12
1998-07-12 19:57:47 by Martin Stjernholm <mast@lysator.liu.se>
5099863833bb2b058d6b8a71f4d3d786844da5a5 (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Tighter arg check in f_transpose().
Rev: src/builtin_functions.c:1.114
4:
||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h"
-
RCSID("$Id: builtin_functions.c,v 1.
113
1998/
06/
07 19:
44
:
46
grubba
Exp $");
+
RCSID("$Id: builtin_functions.c,v 1.
114
1998/
07
/
12
19:
57
:
47
mast
Exp $");
#include "interpret.h" #include "svalue.h" #include "pike_macros.h"
2888:
return; }
-
if(
!(
in->type_field
&
~
BIT_ARRAY)
)
+
if(in->type_field
!=
BIT_ARRAY)
{ array_fix_type_field(in);
-
if(in->type_field & ~BIT_ARRAY)
+
if(
!
in->type_field
|| in->type_field
& ~BIT_ARRAY)
error("The array given as argument 1 to transpose must contain arrays only.\n"); }