annotate src/typemap @ 2441:620a42739426 vim73

Improvements for VMS. (Zoltan Arpadffy)
author Bram Moolenaar <bram@vim.org>
date Fri, 30 Jul 2010 22:29:41 +0200
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}\")