Differences

This shows you the differences between two versions of the page.

--- admin:wsscripts [2011/11/23 21:08] – created jwarrior
+++ admin:wsscripts [2012/06/08 13:53] (current) – jwarrior
@@ Line 1: / Line 1: @@
+====== Workspace Scripts ======
+    System loadedApplications select: [:each | each name = #Chronos].
+    self subApplications do: [:sa |
+        sa defined do: [:each | each comment notEmpty
+            ifTrue: [Transcript show: each name;cr.
+                     Transcript show:each **comment**;cr.
+                     Transcript show: '++++++++++++';cr	]]]
+Print Numbers
+	| stream number |
+	number := self testResult timeOfTestsIn: aTest.
+	stream := WriteStream on: (String new: 20).
+	Locale current lcNumeric printNumber: number on: stream.
+	^stream contents