annotate src/typemap @ 928:03c4ceec6bec v7.0.054

updated for version 7.0-054
author vimboss
date Wed, 16 Aug 2006 13:55:16 +0000
parents 3fc0f57ecb91
children dec4338a7da2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 TYPEMAP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 VIWIN T_VIOBJNOMUNGE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3 VIBUF T_VIOBJNOMUNGE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 INPUT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 T_VIOBJNOMUNGE
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 if (sv_isa($arg, \"${ntype}\")) {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 IV tmp = SvIV((SV*)SvRV($arg));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 $var = ($type) tmp;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 if (!tmp)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 croak(\"$ntype no longer exists\");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 croak(\"$var is not of type ${ntype}\")