2
0
Эх сурвалжийг харах

rtl: fix crash in TMultiReadExclusiveWriteSynchronizer.Beginwrite

git-svn-id: trunk@14591 -
paul 15 жил өмнө
parent
commit
9bad162368

+ 1 - 1
rtl/objpas/sysutils/sysuthrd.inc

@@ -75,7 +75,7 @@ begin
     after aquiring the fwritelock, because otherwise one
     after aquiring the fwritelock, because otherwise one
     writer could reset the fwaitingwriterlock of another one
     writer could reset the fwaitingwriterlock of another one
     that's about to wait on it) }
     that's about to wait on it) }
-  BasicEventResetEvent(fwaitingwriterlock);
+  RTLeventResetEvent(fwaitingwriterlock);
   { new readers have to block from now on; writers get priority to avoid
   { new readers have to block from now on; writers get priority to avoid
     writer starvation (since they have to compete with potentially many
     writer starvation (since they have to compete with potentially many
     concurrent readers) }
     concurrent readers) }