equal
deleted
inserted
replaced
17 |
17 |
18 ^self fullName asSymbol |
18 ^self fullName asSymbol |
19 |
19 |
20 "Created: / 11-06-2008 / 11:20:35 / Jan Vrany <vranyj1@fel.cvut.cz>" |
20 "Created: / 11-06-2008 / 11:20:35 / Jan Vrany <vranyj1@fel.cvut.cz>" |
21 ! ! |
21 ! ! |
22 !Class methodsFor:'accessing'! |
22 !cvut_stx_goodies_newcompiler class methodsFor:'documentation'! |
23 |
23 |
24 bindingOf: classVarName |
24 extensionsVersion_SVN |
25 |
25 ^ '$Id$' |
26 ^(self fullName , ':' , classVarName) asSymbol |
|
27 |
|
28 "Created: / 11-06-2008 / 11:29:19 / Jan Vrany <vranyj1@fel.cvut.cz>" |
|
29 ! ! |
26 ! ! |