From 26a11662d6d371a1d0c44de6bb028a1523ba4dc5 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Sun, 6 Jul 2008 23:53:04 +0200 Subject: Add class MLKNumber, unify arithmetic interface. --- MLKFloat.m | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'MLKFloat.m') diff --git a/MLKFloat.m b/MLKFloat.m index 869726b..e73c433 100644 --- a/MLKFloat.m +++ b/MLKFloat.m @@ -26,7 +26,7 @@ #import -@implementation MLKFloat : MLKLispValue +@implementation MLKFloat +(MLKFloat *) floatWithExponentMarker:(unichar)exponentMarker integerPart:(NSString *)intPart negative:(BOOL)negative @@ -70,10 +70,10 @@ DECLARE_ABSTRACT (-(float) floatValue, 0.0) DECLARE_ABSTRACT (-(double) doubleValue, 0.0) -DECLARE_ABSTRACT (-(MLKFloat *) add:(MLKFloat *)arg, nil) -DECLARE_ABSTRACT (-(MLKFloat *) subtract:(MLKFloat *)arg, nil) -DECLARE_ABSTRACT (-(MLKFloat *) multiplyWith:(MLKFloat *)arg, nil) -DECLARE_ABSTRACT (-(MLKFloat *) divideBy:(MLKFloat *)arg, nil) +DECLARE_ABSTRACT (-(MLKNumber *) add:(MLKNumber *)arg, nil) +DECLARE_ABSTRACT (-(MLKNumber *) subtract:(MLKNumber *)arg, nil) +DECLARE_ABSTRACT (-(MLKNumber *) multiplyWith:(MLKNumber *)arg, nil) +DECLARE_ABSTRACT (-(MLKNumber *) divideBy:(MLKNumber *)arg, nil) -(NSString *) description { -- cgit v1.2.3