equal
deleted
inserted
replaced
2483 "Modified: 22.10.1996 / 17:40:37 / cg" |
2483 "Modified: 22.10.1996 / 17:40:37 / cg" |
2484 ! ! |
2484 ! ! |
2485 |
2485 |
2486 !MessageTracer class methodsFor:'trace helpers'! |
2486 !MessageTracer class methodsFor:'trace helpers'! |
2487 |
2487 |
2488 traceEntryFull:aContext on:aStream |
|
2489 aStream nextPutLine:'-----------------------------------------'. |
|
2490 aContext fullPrintAllOn:aStream |
|
2491 |
|
2492 "Created: / 30.7.1998 / 20:39:57 / cg" |
|
2493 "Modified: / 30.7.1998 / 20:42:23 / cg" |
|
2494 ! |
|
2495 |
|
2496 dummyEmptyMethod |
2488 dummyEmptyMethod |
2497 "helper - to get the time it takes to evaluate the wrappers for |
2489 "helper - to get the time it takes to evaluate the wrappers for |
2498 a dummy method." |
2490 a dummy method." |
2499 |
2491 |
2500 "Created: / 30.7.1998 / 16:58:08 / cg" |
2492 "Created: / 30.7.1998 / 16:58:08 / cg" |
2657 aStream nextPutAll:']'; cr; flush. |
2649 aStream nextPutAll:']'; cr; flush. |
2658 ! |
2650 ! |
2659 |
2651 |
2660 printExit:aContext with:retVal on:aStream |
2652 printExit:aContext with:retVal on:aStream |
2661 self printExit:aContext with:retVal level:0 on:aStream |
2653 self printExit:aContext with:retVal level:0 on:aStream |
|
2654 ! |
|
2655 |
|
2656 traceEntryFull:aContext on:aStream |
|
2657 aStream nextPutLine:'-----------------------------------------'. |
|
2658 aContext fullPrintAllOn:aStream |
|
2659 |
|
2660 "Created: / 30.7.1998 / 20:39:57 / cg" |
|
2661 "Modified: / 30.7.1998 / 20:42:23 / cg" |
2662 ! |
2662 ! |
2663 |
2663 |
2664 traceFullBlockFor:aStream |
2664 traceFullBlockFor:aStream |
2665 "avoid generation of fullBlocks" |
2665 "avoid generation of fullBlocks" |
2666 |
2666 |
2738 ! ! |
2738 ! ! |
2739 |
2739 |
2740 !MessageTracer class methodsFor:'documentation'! |
2740 !MessageTracer class methodsFor:'documentation'! |
2741 |
2741 |
2742 version |
2742 version |
2743 ^ '$Header: /cvs/stx/stx/libbasic3/MessageTracer.st,v 1.71 1998-07-30 20:05:50 cg Exp $' |
2743 ^ '$Header: /cvs/stx/stx/libbasic3/MessageTracer.st,v 1.72 1998-07-30 22:39:58 cg Exp $' |
2744 ! ! |
2744 ! ! |
2745 MessageTracer initialize! |
2745 MessageTracer initialize! |