diff options
author | Rich Hickey <richhickey@gmail.com> | 2007-11-18 16:02:28 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2007-11-18 16:02:28 +0000 |
commit | 7baa797211e956e289bc4e736021161f2e8c085d (patch) | |
tree | a46f552d9bbf0b8612c925fc96fc623669ecffdd | |
parent | 079b143bf2a7bf563b407d4e1dd688988bd2cf04 (diff) |
made inc dec et al coerce to Num
-rw-r--r-- | src/jvm/clojure/lang/Num.java | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/jvm/clojure/lang/Num.java b/src/jvm/clojure/lang/Num.java index de2f7638..31cadb32 100644 --- a/src/jvm/clojure/lang/Num.java +++ b/src/jvm/clojure/lang/Num.java @@ -179,24 +179,24 @@ static public Num negate(Object x){ return Num.from(x).negate(); } -static public Object negPred(Num n){ - return n.minusp() ? RT.T : null; +static public Object negPred(Object x){ + return Num.from(x).minusp() ? RT.T : null; } -static public Object posPred(Num n){ - return n.plusp() ? RT.T : null; +static public Object posPred(Object x){ + return Num.from(x).plusp() ? RT.T : null; } -static public Object zeroPred(Num n){ - return n.zerop() ? RT.T : null; +static public Object zeroPred(Object x){ + return Num.from(x).zerop() ? RT.T : null; } -static public Num dec(Num n){ - return n.oneMinus(); +static public Num dec(Object x){ + return Num.from(x).oneMinus(); } -static public Num inc(Num n){ - return n.onePlus(); +static public Num inc(Object x){ + return Num.from(x).onePlus(); } abstract public Num negate(); |