equal
deleted
inserted
replaced
2097 ^ aFraction class |
2097 ^ aFraction class |
2098 numerator:(aFraction numerator + (self * d)) |
2098 numerator:(aFraction numerator + (self * d)) |
2099 denominator:d |
2099 denominator:d |
2100 |
2100 |
2101 "Modified: 28.7.1997 / 19:08:11 / cg" |
2101 "Modified: 28.7.1997 / 19:08:11 / cg" |
|
2102 ! |
|
2103 |
|
2104 sumFromTimestamp:aTimestamp |
|
2105 "I am to be interpreted as seconds, return the timestamp this number of seconds |
|
2106 after aTimestamp" |
|
2107 |
|
2108 ^ aTimestamp addSeconds:self. |
|
2109 |
|
2110 " |
|
2111 Timestamp now addSeconds:100 |
|
2112 100 sumFromTimestamp:Timestamp now |
|
2113 " |
2102 ! ! |
2114 ! ! |
2103 |
2115 |
2104 !Integer methodsFor:'helpers'! |
2116 !Integer methodsFor:'helpers'! |
2105 |
2117 |
2106 gcd_helper:anInteger |
2118 gcd_helper:anInteger |
3130 " |
3142 " |
3131 |
3143 |
3132 "Modified: 15.10.1997 / 18:43:49 / cg" |
3144 "Modified: 15.10.1997 / 18:43:49 / cg" |
3133 ! ! |
3145 ! ! |
3134 |
3146 |
3135 |
|
3136 !Integer methodsFor:'special bit operators'! |
3147 !Integer methodsFor:'special bit operators'! |
3137 |
3148 |
3138 bitAnd_32:anInteger |
3149 bitAnd_32:anInteger |
3139 "return a C-semantic 32bit locical-and of the receiver and |
3150 "return a C-semantic 32bit locical-and of the receiver and |
3140 the argument. Both must be either Small- or LargeIntegers. |
3151 the argument. Both must be either Small- or LargeIntegers. |
3514 ! ! |
3525 ! ! |
3515 |
3526 |
3516 !Integer class methodsFor:'documentation'! |
3527 !Integer class methodsFor:'documentation'! |
3517 |
3528 |
3518 version |
3529 version |
3519 ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.190 2007-04-02 15:59:31 stefan Exp $' |
3530 ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.191 2007-08-24 13:02:32 sr Exp $' |
3520 ! ! |
3531 ! ! |
3521 |
3532 |
3522 Integer initialize! |
3533 Integer initialize! |