--- a/Semaphore.st Fri Jun 03 11:33:04 2016 +0200
+++ b/Semaphore.st Fri Jun 03 11:34:49 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
@@ -352,10 +354,18 @@
!Semaphore methodsFor:'accessing'!
owner
+ "an optional reference to someone who owns this semaphore,
+ typically a shared queue or a windowgroup or similar.
+ This has no semantic meaning and is only used to support debugging"
+
^ owner
!
owner:something
+ "an optional reference to someone who owns this semaphore,
+ typically a shared queue or a windowgroup or similar.
+ This has no semantic meaning and is only used to support debugging"
+
owner := something.
! !