Itay,
> Alternatively hoping that this is the only Java6-only dependency in
> the code, you can also apply this patch to clj/net/sourceforge/
> waterfront/ide/plugins/file.clj (I didn't test is though - I am away
> from my machine, so no warranty...)
Thanks for the quick fix, it works!
I can now start Waterfront and work with it, but there are still some
error messages at startup concerning certain plugins:
Can't load plugin undo.clj. Reason: java.lang.Exception: LazySeq used
in 'if' (lexer.clj:0)
Can't load plugin comments.clj. Reason: java.lang.Exception: Unable
to resolve symbol: create-undo-transaction in this context
(comments.clj:48)
Can't load plugin find.clj. Reason: java.lang.Exception: Unable to
resolve symbol: create-undo-transaction in this context (find.clj:117)
Can't load plugin check-syntax.clj. Reason: java.lang.Exception:
LazySeq used in 'if' (lexer.clj:0)
Can't load plugin indent.clj. Reason: java.lang.Exception: Unable to
resolve symbol: create-undo-transaction in this context (indent.clj:125)
Can't load plugin paren-matching.clj. Reason: java.lang.Exception:
LazySeq used in 'if' (lexer.clj:0)
Can't load plugin eval-as-you-type.clj. Reason: java.lang.Exception:
LazySeq used in 'if' (lexer.clj:0)
I applied two fixes in lexer.clj that get rid of all these messages:
1) Replace first-is by
(defn first-is
{ :test (fn []
(assert-eq false (first-is \a (seq "")))
(assert-eq true (first-is :nothing (seq "")))
(assert-eq true (first-is \a (seq "a")))
(assert-eq false (first-is :nothing (seq "a")))
(assert-eq true (first-is \a (seq "ab")))
(assert-eq false (first-is :nothing (seq "ab")))
(assert-eq false (first-is \a (seq "ba")))
(assert-eq false (first-is :nothing (seq "ba"))) )}
[e es]
(if (seq es)
(= e (first es))
(= e :nothing) ))
2) Replace get-mate-from-pairs by
(defn get-mate-from-pairs
{ :test (fn []
(assert-eq [:match 4] (get-mate-from-pairs (compute-
paren-matching-pairs "01[3]5") 2)) )}
[pairs offset]
(let [pair (filter (fn [x] (= offset (second x))) pairs)]
(if (seq pair)
[(nth (first pair) 0) (nth (first pair) 2)]
nil )))
Konrad.
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---
