Skip to content

Instantly share code, notes, and snippets.

View WilliamParker's full-sized avatar

William Parker WilliamParker

  • London, United Kingdom
View GitHub Profile
@WilliamParker
WilliamParker / gist:dc606ad086670915efd9
Created December 28, 2015 16:28
Bytecode for the init0 method of unmap-test.core
0 ldc #104 <clojure.core>
2 ldc #106 <in-ns>
4 invokestatic #112 <clojure/lang/RT.var>
7 checkcast #12 <clojure/lang/Var>
10 putstatic #10 <unmap_test/core__init.const__0>
13 aconst_null
14 ldc #114 <unmap-test.core>
16 invokestatic #118 <clojure/lang/Symbol.intern>
19 checkcast #120 <clojure/lang/AFn>
22 putstatic #22 <unmap_test/core__init.const__1>
@WilliamParker
WilliamParker / gist:d8ef4c0555a30135f35a
Created December 28, 2015 16:27
load method from unmap-test example
0 getstatic #10 <unmap_test/core__init.const__0>
3 invokevirtual #16 <clojure/lang/Var.getRawRoot>
6 checkcast #18 <clojure/lang/IFn>
9 getstatic #22 <unmap_test/core__init.const__1>
12 invokeinterface #26 <clojure/lang/IFn.invoke> count 2
17 new #28 <unmap_test/core$loading__5340__auto____965>
20 dup
21 invokespecial #31 <unmap_test/core$loading__5340__auto____965.<init>>
24 checkcast #18 <clojure/lang/IFn>
27 invokeinterface #33 <clojure/lang/IFn.invoke> count 1
@WilliamParker
WilliamParker / gist:8b8b073ab86bf6710a8c
Created December 7, 2015 20:06
Clara example of rules with duplicate RHS except for reader tags
(ns clara.examples.dup-nodes
(:refer-clojure :exclude [==])
(:require [clara.rules.accumulators :as acc]
[clara.rules :refer :all]
[potemkin :as p]))
(p/defrecord+ BindingFact [])
(p/defrecord+ InsertionFact[b])