equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1993 by Claus Gittinger |
4 COPYRIGHT (c) 1993 by Claus Gittinger |
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 |
649 |
651 |
650 !FloatArray methodsFor:'queries'! |
652 !FloatArray methodsFor:'queries'! |
651 |
653 |
652 defaultElement |
654 defaultElement |
653 ^ ShortFloat zero |
655 ^ ShortFloat zero |
|
656 ! |
|
657 |
|
658 isValidElement:anObject |
|
659 "return true, if I can hold this kind of object" |
|
660 |
|
661 ^ anObject isNumber |
654 ! |
662 ! |
655 |
663 |
656 max |
664 max |
657 "return the largest element; |
665 "return the largest element; |
658 redefined for speed" |
666 redefined for speed" |