Databases
StackOverflow2013
Postsdbo
PO
 

Note that there are some explanatory texts on larger screens.

plurals
  1. PO
    primarykey
    data
    text
    <p>I think you are hit by reflection. <code>*warn-on-reflection*</code> is your friend. Here some tests with <a href="http://hugoduncan.org/post/2010/benchmarking_clojure_code_with_criterium.xhtml" rel="nofollow">criterium</a>.</p> <pre><code>replace-templates-original: 56.4us replace-templates-original-hinted: 9.4us replace-templates-new: 131.4us replace-templates-new-hinted: 6.3us replace-templates-very-new: 7.3us </code></pre> <p>Here is the <code>replace-templates-very-new</code>, a version I did myself for golf. :)</p> <pre><code>(defn replace-templates-very-new [^String text m] (let [builder (StringBuilder.)] (loop [text text] (cond (zero? (count text)) (.toString builder) (.startsWith text "{") (let [brace (.indexOf text "}")] (if (neg? brace) (.toString (.append builder text)) (do (.append builder (get m (keyword (subs text 1 brace)))) (recur (subs text (inc brace)))))) :else (let [brace (.indexOf text "{")] (if (neg? brace) (.toString (.append builder text)) (do (.append builder (subs text 0 brace)) (recur (subs text brace))))))))) </code></pre> <p>It passes all tests, so it should work.</p> <p><strong>UPDATE</strong>: Support non-key brace enclosed values (<code>"this is a {not-a-key-{foo}-in-the-map} test" =&gt; "this is a {not-a-key-FOO-in-the-map} test"</code>), allowing it to be used in a Java code generator where non-key brace-enclosed things are significant :-).</p> <pre><code>(defn replace-templates-even-newer "Return a String with each occurrence of a substring of the form {key} replaced with the corresponding value from a map parameter. @param str the String in which to do the replacements @param m a map of keyword-&gt;value @thanks kotarak http://stackoverflow.com/questions/6112534/ follow-up-to-simple-string-template-replacement-in-scala-and-clojure" [^String text m] (let [builder (StringBuilder.)] (loop [text text] (cond (zero? (count text)) (.toString builder) (.startsWith text "{") (let [brace (.indexOf text "}")] (if (neg? brace) (.toString (.append builder text)) (if-let [[_ replacement] (find m (keyword (subs text 1 brace)))] (do (.append builder replacement) (recur (subs text (inc brace)))) (do (.append builder "{") (recur (subs text 1)))))) :else (let [brace (.indexOf text "{")] (if (neg? brace) (.toString (.append builder text)) (do (.append builder (subs text 0 brace)) (recur (subs text brace))))))))) </code></pre>
    singulars
    1. This table or related slice is empty.
    1. POFollow-up to "Simple String template replacement in Scala and Clojure"
      singulars
      1. PTQuestion
    1. PTAnswer
    1. USRalph
    1. USkotarak
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. POFollow-up to "Simple String template replacement in Scala and Clojure"
      singulars
      1. PTQuestion
    1. This table or related slice is empty.
    1. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTUpMod
    2. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTUpMod
    3. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTUpMod
    1. COI suspected as much. I'm usually an old-school programmer -- I started in the days of RAM measured in KBytes and processor speeds in single-digit MHz. I almost always AOT-compile my code with a `(if *compile-files* (set! *warn-on-reflection* true))` at the top of each file, despite the "evils of premature optimization", but in this case, I wrote the original code in Scala and decided to try the algorithm in Clojure at the REPL (for a change). That'll teach me :-). BTW, I like your implementation.
      singulars
      1. PO
      1. USRalph
    2. COOn minor problem with the algorithm: it should not do a replacement if the brace-enclosed string is not a key in the map: `(is (= (replace-templates "this is a {foo} test {baz} 42" {:foo "FOO" :bar "BAR"}) "this is a FOO test {baz} 42"))` Supporting this test case will allow it to be used in a Java code generator. I have the changes for the Scala version. I'll update your Clojure version and post. The algorithm change is to just add the `{` to the StringBuilder and recur with `(.substring text 1)` if the key is not in the map.
      singulars
      1. PO
      1. USRalph
    3. CO@ralph: Good idea! However I changed the implementation to use the little known function `find`, which fits quite well in this scenario. Since it returns `nil` in case the key is not contained, one can seemlessly use `if-let` on the return value. I would also consider indexing the map by string, not keyword.
      singulars
      1. PO
      1. USkotarak
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload