2008-09-17 18:38 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

* harbour/include/hbthread.h
    + added macros to disable default native compiler TLS support:
      HB_NO_TLS

  * harbour/source/vm/set.c
    ! fixed GPF when set listeners were removed

harbour/ChangeLog

@@ -8,6 +8,14 @@
    2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2008-09-17 18:38 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/include/hbthread.h
+    + added macros to disable default native compiler TLS support:
+      HB_NO_TLS
+
+  * harbour/source/vm/set.c
+    ! fixed GPF when set listeners were removed
+
 2008-09-17 18:04 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
   * make_gcc.sh
   * contrib/make_gcc_all.sh

harbour/include/hbthread.h

@@ -297,7 +297,9 @@ extern PHB_ITEM hb_threadMutexTimedSubscribe( PHB_ITEM pItem, ULONG ulMilliSec,
 
 extern void hb_threadMutexUnlockAll( void );
 
-#if !defined( HB_USE_TLS )
+#if defined( HB_NO_TLS )
+#  undef HB_USE_TLS
+#elif !defined( HB_USE_TLS )
    /* enable native compiler TLS support be default for this compilers
     * which are known that it will work correctly
     */

harbour/source/vm/set.c

@@ -1104,7 +1104,8 @@ void hb_setRelease( PHB_SET_STRUCT pSet )
    /* Free all set listeners */
    if( pSet->hb_set_listener )
    {
-      PHB_SET_LISTENER pListener = ( PHB_SET_LISTENER ) pSet->hb_set_listener;
+      PHB_SET_LISTENER pListener = ( ( PHB_SET_LISTENER_LST )
+                                     pSet->hb_set_listener )->first;
       while( pListener )
       {
          PHB_SET_LISTENER pNext = pListener->next;