} elsif ($p->{class} eq "basic") {
print PYOUT "\t", $p->{type}, " param_", $p->{name}, ";\n";
} elsif ($p->{class} eq "struct") {
- die $p->{where}, ": INOUT struct args not supported" if ($p->{dir} eq "INOUT");
print PYOUT "\tstruct py_", $p->{type}, " *param_", $p->{name}, ";\n";
} elsif ($p->{class} eq "bulk") {
- die $p->{where}, ": INOUT bulk args not supported" if ($p->{dir} eq "INOUT");
print PYOUT "\tPyObject *param_", $p->{name}, ";\n"
unless ($p->{dir} eq "OUT");
} else {