← Back to branch summary

~ubuntu-branches/debian/sid/libuniversal-ref-perl/sid

« back to all changes in this revision

Viewing changes to typemap

  • Committer: Package Import Robot
  • Author(s): Jonas Smedegaard
  • Date: 2015-02-24 22:56:47 UTC
  • Revision ID: package-import@ubuntu.com-20150224225647-oae4wnyoolc336m5
Tags: upstream-0.14
Import upstream version 0.14

Show diffs side-by-side

added added

removed removed

Lines of Context:
typemap
 
1
TYPEMAP
 
2
B::OP           T_OP_OBJ
 
3
B::UNOP         T_OP_OBJ
 
4
B::BINOP        T_OP_OBJ
 
5
B::LOGOP        T_OP_OBJ
 
6
B::LISTOP       T_OP_OBJ
 
7
B::PMOP         T_OP_OBJ
 
8
B::SVOP         T_OP_OBJ
 
9
B::PADOP        T_OP_OBJ
 
10
B::PVOP         T_OP_OBJ
 
11
B::LOOP         T_OP_OBJ
 
12
B::COP          T_OP_OBJ
 
13
 
 
14
INPUT
 
15
T_OP_OBJ
 
16
        if (SvROK($arg)) {
 
17
            IV tmp = SvIV((SV*)SvRV($arg));
 
18
            $var = INT2PTR($type,tmp);
 
19
        }
 
20
        else
 
21
            croak(\"$var is not a reference\")