equal
deleted
inserted
replaced
33 "m selector ~~ self nameOfVersionMethodForExtensions"] |
33 "m selector ~~ self nameOfVersionMethodForExtensions"] |
34 ] |
34 ] |
35 ] ifFalse:[ |
35 ] ifFalse:[ |
36 filter := [:mth | mth package = package ]. |
36 filter := [:mth | mth package = package ]. |
37 ]. |
37 ]. |
38 |
38 klass isLoaded ifFalse:[ klass autoload ]. |
39 |
39 klass fileOutOn:aStream |
40 klass fileOutOn:aStream |
40 withTimeStamp:false |
41 withTimeStamp:false |
41 withInitialize:true |
42 withInitialize:true |
42 withDefinition:true |
43 withDefinition:true |
43 methodFilter:filter. |
44 methodFilter:filter. |
|
45 |
44 |
46 "Created: / 01-03-2013 / 17:51:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
45 "Created: / 01-03-2013 / 17:51:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
47 "Modified: / 29-07-2013 / 19:09:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
46 "Modified: / 15-12-2014 / 11:27:02 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
48 ! |
47 ! |
49 |
48 |
50 validate |
49 validate |
51 | file | |
50 | file | |
52 |
51 |