equal
deleted
inserted
replaced
1028 self do:[:v | values add:v]. |
1028 self do:[:v | values add:v]. |
1029 ^ values |
1029 ^ values |
1030 |
1030 |
1031 "Created: 20.6.1997 / 16:58:28 / cg" |
1031 "Created: 20.6.1997 / 16:58:28 / cg" |
1032 ! ! |
1032 ! ! |
1033 |
|
1034 |
1033 |
1035 !Smalltalk class methodsFor:'browsing'! |
1034 !Smalltalk class methodsFor:'browsing'! |
1036 |
1035 |
1037 browseAllCallsOn:aSelectorSymbol |
1036 browseAllCallsOn:aSelectorSymbol |
1038 "{ Pragma: +optSpace }" |
1037 "{ Pragma: +optSpace }" |
5782 " |
5781 " |
5783 |
5782 |
5784 "Modified: 31.10.1996 / 16:57:24 / cg" |
5783 "Modified: 31.10.1996 / 16:57:24 / cg" |
5785 ! |
5784 ! |
5786 |
5785 |
5787 secureFileIn:aFileName |
5786 secureFileIn:aFileName |
5788 "read in the named file, looking for it at standard places. |
5787 "read in the named file, looking for it at standard places. |
5789 Catch any error during fileIn. Return true if ok, false if failed" |
5788 Catch various errors during fileIn. |
5790 |
5789 Return true if ok, false if failed" |
|
5790 |
5791 |retVal| |
5791 |retVal| |
5792 |
5792 |
5793 retVal := false. |
5793 retVal := false. |
5794 (SignalSet with:AbortOperationRequest with:TerminateProcessRequest) |
5794 (SignalSet |
5795 handle:[:ex | ex return ] |
5795 with:AbortOperationRequest |
5796 do:[ retVal := self fileIn:aFileName ]. |
5796 with:TerminateProcessRequest |
|
5797 with:Parser parseErrorSignal) |
|
5798 handle:[:ex | ex return ] |
|
5799 do:[ retVal := self fileIn:aFileName ]. |
5797 ^ retVal |
5800 ^ retVal |
5798 ! |
5801 ! |
5799 |
5802 |
5800 silentFileIn:aFilename |
5803 silentFileIn:aFilename |
5801 "same as fileIn:, but do not output 'compiled...'-messages on Transcript. |
5804 "same as fileIn:, but do not output 'compiled...'-messages on Transcript. |
7460 ! ! |
7463 ! ! |
7461 |
7464 |
7462 !Smalltalk class methodsFor:'documentation'! |
7465 !Smalltalk class methodsFor:'documentation'! |
7463 |
7466 |
7464 version |
7467 version |
7465 ^ '$Id: Smalltalk.st 10544 2010-07-12 16:20:36Z vranyj1 $' |
7468 ^ '$Id: Smalltalk.st 10564 2010-08-10 08:55:15Z vranyj1 $' |
7466 ! |
7469 ! |
7467 |
7470 |
7468 version_CVS |
7471 version_CVS |
7469 ^ 'Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.936 2010/05/07 12:37:03 cg Exp ' |
7472 ^ 'Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.937 2010/08/06 13:05:23 stefan Exp ' |
7470 ! |
7473 ! |
7471 |
7474 |
7472 version_SVN |
7475 version_SVN |
7473 ^ '$Id: Smalltalk.st 10544 2010-07-12 16:20:36Z vranyj1 $' |
7476 ^ '$Id: Smalltalk.st 10564 2010-08-10 08:55:15Z vranyj1 $' |
7474 ! ! |
7477 ! ! |
7475 |
7478 |
7476 |
7479 |
7477 |
7480 |
7478 |
7481 |
7481 |
7484 |
7482 |
7485 |
7483 |
7486 |
7484 |
7487 |
7485 |
7488 |
|
7489 |