equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 2000 by eXept Software AG |
4 COPYRIGHT (c) 2000 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
1029 |holder| |
1031 |holder| |
1030 |
1032 |
1031 selectedMethodsArray isNil ifTrue:[ |
1033 selectedMethodsArray isNil ifTrue:[ |
1032 selectedMethodsArray := OrderedCollection new |
1034 selectedMethodsArray := OrderedCollection new |
1033 ]. |
1035 ]. |
1034 index > selectedMethodsArray size ifTrue:[ |
1036 selectedMethodsArray ensureSizeAtLeast:index. |
1035 selectedMethodsArray grow:index |
|
1036 ]. |
|
1037 holder := selectedMethodsArray at:index. |
1037 holder := selectedMethodsArray at:index. |
1038 holder isNil ifTrue:[ |
1038 holder isNil ifTrue:[ |
1039 selectedMethodsArray at:index put:(holder := ValueHolder new) |
1039 selectedMethodsArray at:index put:(holder := ValueHolder new) |
1040 ]. |
1040 ]. |
1041 ^ holder. |
1041 ^ holder. |
1085 |holder| |
1085 |holder| |
1086 |
1086 |
1087 selectorListGeneratorArray isNil ifTrue:[ |
1087 selectorListGeneratorArray isNil ifTrue:[ |
1088 selectorListGeneratorArray := OrderedCollection new |
1088 selectorListGeneratorArray := OrderedCollection new |
1089 ]. |
1089 ]. |
1090 index > selectorListGeneratorArray size ifTrue:[ |
1090 selectorListGeneratorArray ensureSizeAtLeast:index. |
1091 selectorListGeneratorArray grow:index |
|
1092 ]. |
|
1093 holder := selectorListGeneratorArray at:index. |
1091 holder := selectorListGeneratorArray at:index. |
1094 holder isNil ifTrue:[ |
1092 holder isNil ifTrue:[ |
1095 selectorListGeneratorArray at:index put:(holder := ValueHolder new) |
1093 selectorListGeneratorArray at:index put:(holder := ValueHolder new) |
1096 ]. |
1094 ]. |
1097 ^ holder. |
1095 ^ holder. |
1201 ]. |
1199 ]. |
1202 ^ variableFilter |
1200 ^ variableFilter |
1203 |
1201 |
1204 "Created: / 24.2.2000 / 23:45:28 / cg" |
1202 "Created: / 24.2.2000 / 23:45:28 / cg" |
1205 ! ! |
1203 ! ! |
|
1204 |
1206 |
1205 |
1207 !NavigationState methodsFor:'aspects-kludges'! |
1206 !NavigationState methodsFor:'aspects-kludges'! |
1208 |
1207 |
1209 metaToggle |
1208 metaToggle |
1210 metaToggle isNil ifTrue:[ |
1209 metaToggle isNil ifTrue:[ |
1723 ! ! |
1722 ! ! |
1724 |
1723 |
1725 !NavigationState class methodsFor:'documentation'! |
1724 !NavigationState class methodsFor:'documentation'! |
1726 |
1725 |
1727 version |
1726 version |
1728 ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationState.st,v 1.60 2015-02-20 21:46:26 cg Exp $' |
1727 ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationState.st,v 1.61 2015-05-20 10:27:52 cg Exp $' |
1729 ! |
1728 ! |
1730 |
1729 |
1731 version_CVS |
1730 version_CVS |
1732 ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationState.st,v 1.60 2015-02-20 21:46:26 cg Exp $' |
1731 ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationState.st,v 1.61 2015-05-20 10:27:52 cg Exp $' |
1733 ! |
1732 ! |
1734 |
1733 |
1735 version_SVN |
1734 version_SVN |
1736 ^ '$Id: Tools__NavigationState.st,v 1.60 2015-02-20 21:46:26 cg Exp $' |
1735 ^ '$Id: Tools__NavigationState.st,v 1.61 2015-05-20 10:27:52 cg Exp $' |
1737 ! ! |
1736 ! ! |
1738 |
1737 |
1739 |
1738 |
1740 NavigationState initialize! |
1739 NavigationState initialize! |