equal
deleted
inserted
replaced
104 "Modified: / 19-07-2011 / 17:24:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
104 "Modified: / 19-07-2011 / 17:24:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
105 ! |
105 ! |
106 |
106 |
107 type:t value:val from: startPos to: endPos |
107 type:t value:val from: startPos to: endPos |
108 |
108 |
109 ^(self type: t value: val) |
109 ^(self basicNew) |
110 startPosition: startPos; |
110 type: t value: val; |
|
111 startPosition: startPos |
111 endPosition: endPos; |
112 endPosition: endPos; |
112 yourself |
113 yourself |
113 |
114 |
114 "Created: / 19-07-2011 / 17:50:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
115 "Created: / 19-07-2011 / 17:50:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
115 ! |
116 ! |
393 ! ! |
394 ! ! |
394 |
395 |
395 !ConstantNode class methodsFor:'documentation'! |
396 !ConstantNode class methodsFor:'documentation'! |
396 |
397 |
397 version_CVS |
398 version_CVS |
398 ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.48 2011-07-25 22:37:30 vrany Exp $' |
399 ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.49 2011-07-27 19:15:25 vrany Exp $' |
399 ! |
400 ! |
400 |
401 |
401 version_SVN |
402 version_SVN |
402 ^ '§ Id §' |
403 ^ '§ Id §' |
403 ! ! |
404 ! ! |