#
# Copyright 2006.  VMware, Inc.  The use of this code is subject to 
# your agreement to the terms of an applicable VMware license.
#

Bool                           T_INT
const char *                   T_CCHAR

VixError                       T_INT
VixHandle                      T_INT
VixHandleType                  T_INT
VixVMPowerOpOptions            T_INT
VixServiceProvider             T_INT
VixFindItemType                T_INT
VixPropertyID                  T_INT
VixPropertyType                T_INT
VixMsgSharedFolderOptions      T_INT
VixRunProgramOptions           T_INT

#FoundryPropertyList     FOUNDRY_PROPERTY_LIST

#############################################################################
INPUT
T_CCHAR
        if (SvOK($arg)) {
                $var = ($type)SvPV($arg,PL_na);
        } else {
                $var = NULL;
        }


#FOUNDRY_PROPERTY_LIST
#        $var = {.internalState=(int)SvIV($arg)};


#############################################################################
OUTPUT
T_CCHAR
        sv_setpv((SV*)$arg, $var);

#FOUNDRY_PROPERTY_LIST
#        sv_setiv((SV*)$arg, (int)$var.internalState); 

