Skip to content

Instantly share code, notes, and snippets.

package com.github.igrishaev;
import clojure.lang.PersistentVector;
import clojure.lang.PersistentVector$TransientVector;
public class VectorReducer implements IReducer<PersistentVector$TransientVector, PersistentVector> {
PersistentVector$TransientVector initiate() {
return PersistentVector.EMPTY().asTransient();
}
var Circle = {
PI: 3.1415,
init:
function (x) {
var obj = Object.create(Circle);
obj.x = x;
return obj;
(as-manager ...
)
(with-context [foo1 {}
bar2 {}]
)
(do
(letfn [(->iter [coll]
(clojure.lang.RT/iter coll))
(has-next? [iter]
(.hasNext ^java.util.Iterator iter))
(next! [iter]
(.next ^java.util.Iterator iter))]
(defn map!
([f coll]
(mapv f coll))
([f coll & colls]
(ns repl
(:require
[pg.client :as pg]))
(def config
{:host "127.0.0.1"
:port 10150
:user "test"
:password "test"
:database "test"})
(defn gipz-encode ^bytes [^bytes input]
(let [in
(new ByteArrayInputStream input)
out-bytes
(new ByteArrayOutputStream)
out-gzip
(new GZIPOutputStream out-bytes true)
#_(def any-refs
(some-fn :venue
:tour
:media
:ticket-classes
:orders
:tickets
:purchaser
:attendee))
(def -m (doto (new java.util.HashMap)
(.put "a" 1)
(.put "b" 2)))
(defmacro for-each [[bind ^Iterable coll] & body]
`(.forEach conn
(reify java.util.function.BiConsumer
(accept [_# a b]
(println a b))))
// Decompiling class: pg/client2/sql$fn__9962
package pg.client2;
import clojure.lang.*;
public final class sql$fn__9962 extends AFunction
{
public static final Keyword const__0;
public static final Keyword const__1;
public static final String const__2;
\documentclass[11pt]{book}
\usepackage[OT1, T2A]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[english, russian]{babel}
\usepackage[newfloat=true]{minted}
\usemintedstyle{bw}