diff options
author | Rich Hickey <richhickey@gmail.com> | 2010-03-11 07:38:13 -0500 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2010-03-11 07:38:13 -0500 |
commit | dc71e66bd8c6f0e918d471a5cdff2655ab90cdb0 (patch) | |
tree | aebd7263949f11a922b0bf79e274f03733bf1e2e | |
parent | df17f32858eb0b700d21a2a2364a54596f139e89 (diff) |
changed isInline to treat arities as predicate IFn, not hardwire set
-rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 881379c4..b484534c 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -5185,8 +5185,8 @@ static public IFn isInline(Object op, int arity) throws Exception{ IFn ret = (IFn) RT.get(v.meta(), inlineKey); if(ret != null) { - IPersistentSet arities = (IPersistentSet) RT.get(v.meta(), inlineAritiesKey); - if(arities == null || arities.contains(arity)) + IFn arityPred = (IFn) RT.get(v.meta(), inlineAritiesKey); + if(arityPred == null || RT.booleanCast(arityPred.invoke(arity))) return ret; } } |