diff options
| author | Erez Geva <ErezGeva2@gmail.com> | 2022-05-11 01:10:12 +0200 |
|---|---|---|
| committer | Erez Geva <ErezGeva2@gmail.com> | 2022-05-11 01:10:12 +0200 |
| commit | b88fe498cab92e18ad0a7b12e5ca9a49d4ac4ec0 (patch) | |
| tree | 0d675ac3cf1e11fa33baa185733dd7fd88597a94 /Lib/php | |
| parent | 464d548d7173d964b028941400b7e6a740fb7f94 (diff) | |
| download | swig-b88fe498cab92e18ad0a7b12e5ca9a49d4ac4ec0.tar.gz | |
Fix argcargv.i in Perl5, Tcl, PHP
Add missing type map for type check.
Add testing of argcargv.i for Perl5, Tcl, PHP and Ruby.
Signed-off-by: Erez Geva <ErezGeva2@gmail.com>
Diffstat (limited to 'Lib/php')
| -rw-r--r-- | Lib/php/argcargv.i | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Lib/php/argcargv.i b/Lib/php/argcargv.i index 14b0cf2c9..15a86a942 100644 --- a/Lib/php/argcargv.i +++ b/Lib/php/argcargv.i @@ -33,6 +33,10 @@ $2[i] = NULL; } +%typemap(typecheck, precedence=SWIG_TYPECHECK_STRING_ARRAY) (int ARGC, char **ARGV) { + $1 = Z_TYPE($input) == IS_ARRAY; +} + %typemap(freearg) (int ARGC, char **ARGV) { if ($2 != NULL) { free((void *)$2); |