anchor.diff:      (dsl/from :book)
       (dsl/where (dsl/or "book.age > 20"
                          (dsl/not "book.in_store")))
  -    (fmt/get-sql))
  +    (fmt/sql))
   ;; => "select name from book where ((book.age > 20) or (not book.in_store))"
   ----
   
  
positive.code: [source, clojure]
  ----
  ;; Create table
  (sc/execute *ctx* "create table t1 (k json)")
  
  ;; Insert a json value
  (sc/execute *ctx* ["insert into t1 (k) values (?)" {:foo 1}])
  
  ;; Query a table with json value
  (sc/fetch *ctx* ["select * from t1"])
  ;; => [{:k {:foo 1}}]
  ----
  
  
negative.code:     (dsl/set :name (dsl/f ["concat(name, ?)" "-foo"]))
      (dsl/set :name_length (dsl/f "length(name)"))
      (dsl/returning :id)
      (fmt/sql {:dialect :pgsql}))
  ;; => "update t1 set name = ? returning id"
  ----
  
  