equal
deleted
inserted
replaced
1409 aStream space. |
1409 aStream space. |
1410 self selector printOn:aStream. |
1410 self selector printOn:aStream. |
1411 aStream space. |
1411 aStream space. |
1412 aStream nextPutAll:' ['; nextPutAll:self lineNumber printString; nextPutAll:']' . |
1412 aStream nextPutAll:' ['; nextPutAll:self lineNumber printString; nextPutAll:']' . |
1413 |
1413 |
1414 ! |
|
1415 |
|
1416 printString |
|
1417 "return a string describing the context" |
|
1418 |
|
1419 ^ self receiverPrintString , ' ' , self selector printString |
|
1420 ! |
1414 ! |
1421 |
1415 |
1422 receiverPrintString |
1416 receiverPrintString |
1423 "return a string describing the receiver of the context" |
1417 "return a string describing the receiver of the context" |
1424 |
1418 |
1918 ! ! |
1912 ! ! |
1919 |
1913 |
1920 !Context class methodsFor:'documentation'! |
1914 !Context class methodsFor:'documentation'! |
1921 |
1915 |
1922 version |
1916 version |
1923 ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.101 1999-09-03 12:49:21 ps Exp $' |
1917 ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.102 1999-10-22 18:25:14 cg Exp $' |
1924 ! ! |
1918 ! ! |
1925 Context initialize! |
1919 Context initialize! |