Mercurial Mercurial > hg > stx-libbasic3 / 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.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Fri, 31 Jul 1998 00:39:58 +0200
changeset 697 062ee48ece19
parent 696 d754acb87c1b
child 698 7761fb1646ee
checkin from browser
MessageTracer.st file | annotate | diff | comparison | revisions
MsgTracer.st file | annotate | diff | comparison | revisions 
--- a/MessageTracer.st	Thu Jul 30 22:05:50 1998 +0200
+++ b/MessageTracer.st	Fri Jul 31 00:39:58 1998 +0200
@@ -2485,14 +2485,6 @@
 
 !MessageTracer class methodsFor:'trace helpers'!
 
-traceEntryFull:aContext on:aStream
-    aStream nextPutLine:'-----------------------------------------'.
-    aContext fullPrintAllOn:aStream
-
-    "Created: / 30.7.1998 / 20:39:57 / cg"
-    "Modified: / 30.7.1998 / 20:42:23 / cg"
-!
-
 dummyEmptyMethod
     "helper - to get the time it takes to evaluate the wrappers for
      a dummy method."
@@ -2661,6 +2653,14 @@
     self printExit:aContext with:retVal level:0 on:aStream
 !
 
+traceEntryFull:aContext on:aStream
+    aStream nextPutLine:'-----------------------------------------'.
+    aContext fullPrintAllOn:aStream
+
+    "Created: / 30.7.1998 / 20:39:57 / cg"
+    "Modified: / 30.7.1998 / 20:42:23 / cg"
+!
+
 traceFullBlockFor:aStream
     "avoid generation of fullBlocks"
 
@@ -2740,6 +2740,6 @@
 !MessageTracer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MessageTracer.st,v 1.71 1998-07-30 20:05:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MessageTracer.st,v 1.72 1998-07-30 22:39:58 cg Exp $'
 ! !
 MessageTracer initialize!
--- a/MsgTracer.st	Thu Jul 30 22:05:50 1998 +0200
+++ b/MsgTracer.st	Fri Jul 31 00:39:58 1998 +0200
@@ -2485,14 +2485,6 @@
 
 !MessageTracer class methodsFor:'trace helpers'!
 
-traceEntryFull:aContext on:aStream
-    aStream nextPutLine:'-----------------------------------------'.
-    aContext fullPrintAllOn:aStream
-
-    "Created: / 30.7.1998 / 20:39:57 / cg"
-    "Modified: / 30.7.1998 / 20:42:23 / cg"
-!
-
 dummyEmptyMethod
     "helper - to get the time it takes to evaluate the wrappers for
      a dummy method."
@@ -2661,6 +2653,14 @@
     self printExit:aContext with:retVal level:0 on:aStream
 !
 
+traceEntryFull:aContext on:aStream
+    aStream nextPutLine:'-----------------------------------------'.
+    aContext fullPrintAllOn:aStream
+
+    "Created: / 30.7.1998 / 20:39:57 / cg"
+    "Modified: / 30.7.1998 / 20:42:23 / cg"
+!
+
 traceFullBlockFor:aStream
     "avoid generation of fullBlocks"
 
@@ -2740,6 +2740,6 @@
 !MessageTracer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/MsgTracer.st,v 1.71 1998-07-30 20:05:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/MsgTracer.st,v 1.72 1998-07-30 22:39:58 cg Exp $'
 ! !
 MessageTracer initialize!
hg/stx-libbasic3