typemap

   1 TYPEMAP
   2 varspec_t       T_VARSPEC
   3 vartype_t       T_VARTYPE
   4
   5 INPUT
   6 T_VARSPEC
   7     if (SvPOK($arg))
   8         _deconstruct_variable_name($arg, &$var);
   9     else if (SvROK($arg) && SvTYPE(SvRV($arg)) == SVt_PVHV)
  10         _deconstruct_variable_hash((HV*)SvRV($arg), &$var);
  11     else
  12         croak(\"varspec must be a string or a hashref\");
  13     _check_varspec_is_valid(&$var);
  14
  15 T_VARTYPE
  16     if (!SvPOK($arg))
  17         croak(\"vartype must be a string\");
  18     $var = string_to_vartype(SvPV_nolen($arg));