Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Wed, 09 Aug 2017 11:51:02 +0200
changeset 22172 c82beb3cb7a7
parent 22171 fe0e08536dd2
child 22173 2b5ea01dc3e1
#REFACTORING by cg class: RecursionLock class added: #name:
RecursionLock.st file | annotate | diff | comparison | revisions 
--- a/RecursionLock.st	Wed Aug 09 11:50:52 2017 +0200
+++ b/RecursionLock.st	Wed Aug 09 11:51:02 2017 +0200
@@ -93,6 +93,12 @@
 
 !RecursionLock class methodsFor:'instance creation'!
 
+name:aString
+    ^ self basicNew setCount:1 name:aString
+
+    "Created: / 09-08-2017 / 11:47:21 / cg"
+!
+
 new
     ^ self basicNew setCount:1
hg/stx-libbasic