diff options
| author | Stuart Sierra <mail@stuartsierra.com> | 2009-06-05 20:58:44 +0000 |
|---|---|---|
| committer | Stuart Sierra <mail@stuartsierra.com> | 2009-06-05 20:58:44 +0000 |
| commit | d1e94596041492038f321885bf77e16d9a0a7589 (patch) | |
| tree | 8a043ffae46f841e089bc4376828995aaca1671a /src | |
| parent | bea244b4d5e8512d4d659c0308a7781a606bccfd (diff) | |
str_utils2.clj: fix some comments
Diffstat (limited to 'src')
| -rw-r--r-- | src/clojure/contrib/str_utils2.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/str_utils2.clj b/src/clojure/contrib/str_utils2.clj index 988d6a6d..40765dfc 100644 --- a/src/clojure/contrib/str_utils2.clj +++ b/src/clojure/contrib/str_utils2.clj @@ -43,6 +43,7 @@ [bindings & body] (assert (vector bindings)) (assert (= 2 (count bindings))) + ;; This seems to be the fastest way to iterate over characters. `(let [#^String s# ~(second bindings)] (dotimes [i# (.length s#)] (let [~(first bindings) (.charAt s# i#)] @@ -58,7 +59,6 @@ [bindings & body] (assert (vector bindings)) (assert (= 2 (count bindings))) - ;; This seems to be the fastest way to iterate over characters. (let [character (first bindings) string (second bindings)] `(let [#^String s# ~string |