Hi Przemek and all,
I'm trying to map all xhb MT functions to Harbour equivalents
to aid porting some MT dependent parts. Here's my rough
results. Please extend, correct and if we reach a usable state,
I'd like to add it to hbcompat.ch.

DESTROYMUTEX                 -
GETCURRENTTHREAD             HB_THREADSELF
GETSYSTEMTHREADID            ?
GETTHREADID                  HB_THREADID
HB_MUTEXCREATE               HB_MUTEXCREATE
HB_MUTEXLOCK                 HB_MUTEXLOCK
HB_MUTEXTIMEOUTLOCK          HB_MUTEXLOCK
HB_MUTEXTRYLOCK            ~ HB_MUTEXLOCK
HB_MUTEXUNLOCK               HB_MUTEXUNLOCK
HB_THREADCOUNTSTACKS         (debug)
HB_THREADGETTRYERRORARRAY    (internal)
ISSAMETHREAD( x, y )         ( x == y )
ISVALIDTHREAD( x )           ( HB_THREADID( x ) != 0 )
JOINTHREAD                   HB_THREADJOIN
KILLALLTHREADS               HB_THREADTERMINATEALL
KILLTHREAD                   HB_THREADDETACH
NOTIFY                       HB_MUTEXNOTIFY
NOTIFYALL                    HB_MUTEXNOTIFYALL
SECONDSSLEEP( x )            HB_THREADWAIT( , x * 1000 )
STARTTHREAD                  HB_THREADSTART
STOPTHREAD                   HB_THREADQUITREQUEST
SUBSCRIBE                    HB_MUTEXSUBSCRIBE
SUBSCRIBENOW                 HB_MUTEXSUBSCRIBENOW
THREADGETCURRENT             HB_THREADID
THREADGETCURRENTINTERNAL     (debug)
THREADIDLEFENCE              ?
THREADINSPECT                (debug)
THREADINSPECTEND             (debug)
THREADISINSPECTOR            (debug)
THREADSLEEP( x )             HB_THREADWAIT( , x )
WAITFORTHREADS               HB_THREADWAITFORALL

Brgds,
Viktor
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to