Exemple #1
0
void hb_errInit( void )
{
   HB_TRACE( HB_TR_DEBUG, ( "hb_errInit()" ) );

   /* error function */
   hb_dynsymNew( &s_symErrorNew );

   /* Create error class and base object */
   s_pError = hb_itemNew( NULL );
   hb_clsAssociate( hb_errClassCreate() );
   hb_itemMove( s_pError, hb_stackReturnItem() );
}
Exemple #2
0
PHB_ITEM
hbgi_hb_clsInst(HB_USHORT uiClass)
{
   hb_clsAssociate(uiClass);
   return hb_stackReturnItem();
}