/* * $Id$ */ /* -------------------------------------------------------------------- */ /* WARNING: Automatically generated source file. DO NOT EDIT! */ /* Instead, edit corresponding .qth file, */ /* or the generator tool itself, and run regenarate. */ /* -------------------------------------------------------------------- */ /* * Harbour Project source code: * QT wrapper main header * * Copyright 2009-2010 Pritpal Bedi * * Copyright 2009 Marcos Antonio Gambeta * www - http://www.harbour-project.org * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2, or (at your option) * any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this software; see the file COPYING. If not, write to * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). * * As a special exception, the Harbour Project gives permission for * additional uses of the text contained in its release of Harbour. * * The exception is that, if you link the Harbour libraries with other * files to produce an executable, this does not by itself cause the * resulting executable to be covered by the GNU General Public License. * Your use of that executable is in no way restricted on account of * linking the Harbour library code into it. * * This exception does not however invalidate any other reasons why * the executable file might be covered by the GNU General Public License. * * This exception applies only to the code released by the Harbour * Project under the name Harbour. If you copy code from other * Harbour Project or Free Software Foundation releases into a copy of * Harbour, as the General Public License permits, the exception does * not apply to the code that you add in this way. To avoid misleading * anyone as to the status of such modified files, you must delete * this exception notice from them. * * If you write modifications of your own for Harbour, it is your choice * whether to permit this exception to apply to your modifications. * If you do not wish that, delete this exception notice. * */ /*----------------------------------------------------------------------*/ #include "../hbqt.h" /*----------------------------------------------------------------------*/ #if QT_VERSION >= 0x040500 /*----------------------------------------------------------------------*/ #include #include /* * QLatin1Char ( char c ) */ typedef struct { QLatin1Char * ph; bool bNew; QT_G_FUNC_PTR func; } QGC_POINTER_QLatin1Char; QT_G_FUNC( hbqt_gcRelease_QLatin1Char ) { QGC_POINTER * p = ( QGC_POINTER * ) Cargo; if( p && p->bNew ) { if( p->ph ) { HB_TRACE( HB_TR_DEBUG, ( "ph=%p _rel_QLatin1Char /.\\", p->ph ) ); delete ( ( QLatin1Char * ) p->ph ); HB_TRACE( HB_TR_DEBUG, ( "ph=%p YES_rel_QLatin1Char \\./", p->ph ) ); p->ph = NULL; } else { HB_TRACE( HB_TR_DEBUG, ( "ph=%p DEL_rel_QLatin1Char : Object already deleted!", p->ph ) ); p->ph = NULL; } } else { HB_TRACE( HB_TR_DEBUG, ( "ph=%p PTR_rel_QLatin1Char : Object not created with new=true", p->ph ) ); p->ph = NULL; } } void * hbqt_gcAllocate_QLatin1Char( void * pObj, bool bNew ) { QGC_POINTER * p = ( QGC_POINTER * ) hb_gcAllocate( sizeof( QGC_POINTER ), hbqt_gcFuncs() ); p->ph = ( QLatin1Char * ) pObj; p->bNew = bNew; p->func = hbqt_gcRelease_QLatin1Char; if( bNew ) { HB_TRACE( HB_TR_DEBUG, ( "ph=%p _new_QLatin1Char", pObj ) ); } else { HB_TRACE( HB_TR_DEBUG, ( "ph=%p NOT_new_QLatin1Char", pObj ) ); } return p; } HB_FUNC( QT_QLATIN1CHAR ) { QLatin1Char * pObj = NULL; pObj = new QLatin1Char( *hb_parcx( 1 ) ) ; hb_retptrGC( hbqt_gcAllocate_QLatin1Char( ( void * ) pObj, true ) ); } /* * char toLatin1 () const */ HB_FUNC( QT_QLATIN1CHAR_TOLATIN1 ) { QLatin1Char * p = hbqt_par_QLatin1Char( 1 ); if( p ) hb_retni( ( p )->toLatin1() ); else { HB_TRACE( HB_TR_DEBUG, ( "............................... F=QT_QLATIN1CHAR_TOLATIN1 FP=hb_retni( ( p )->toLatin1() ); p is NULL" ) ); } } /* * ushort unicode () const */ HB_FUNC( QT_QLATIN1CHAR_UNICODE ) { QLatin1Char * p = hbqt_par_QLatin1Char( 1 ); if( p ) hb_retni( ( p )->unicode() ); else { HB_TRACE( HB_TR_DEBUG, ( "............................... F=QT_QLATIN1CHAR_UNICODE FP=hb_retni( ( p )->unicode() ); p is NULL" ) ); } } /*----------------------------------------------------------------------*/ #endif /* #if QT_VERSION >= 0x040500 */ /*----------------------------------------------------------------------*/