middle ground

nextjournal · Sep 24, 2024 · c4785a2 · c4785a2
1 parent 00f48c2
commit c4785a2
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 10 deletions.
diff --git a/src/nextjournal/markdown/impl/types.clj b/src/nextjournal/markdown/impl/types.clj
@@ -1,34 +1,29 @@
-(ns nextjournal.markdown.impl.types)
+(ns nextjournal.markdown.impl.types
+  (:import [nextjournal.markdown.impl.types CustomNode]))
 
 ;; See also
 ;; https://github.com/noties/Markwon/blob/master/markwon-ext-latex/src/main/java/io/noties/markwon/ext/latex/JLatexMathBlockParser.java
 
 (set! *warn-on-reflection* true)
 
-(defonce _
-  (definterface CustomNode
-    (getLiteral [])
-    (setLiteral [v])
-    (nodeType [])))
-
 (defn ->InlineFormula [lit]
   (let [state (atom lit)]
-    (proxy [org.commonmark.node.CustomNode nextjournal.markdown.impl.types.CustomNode] []
+    (proxy [org.commonmark.node.CustomNode CustomNode] []
       (getLiteral [] @state)
       (nodeType [] :inline-formula))))
 
 (defn ->BlockFormula
   ([] (->BlockFormula nil))
   ([lit]
    (let [state (atom lit)]
-     (proxy [org.commonmark.node.CustomBlock nextjournal.markdown.impl.types.CustomNode] []
+     (proxy [org.commonmark.node.CustomBlock CustomNode] []
        (getLiteral [] @state)
        (setLiteral [v] (do (reset! state v)
                            this))
        (nodeType [] :block-formula)))))
 
 (defn ->ToC []
-  (proxy [org.commonmark.node.CustomBlock nextjournal.markdown.impl.types.CustomNode] []
+  (proxy [org.commonmark.node.CustomBlock CustomNode] []
     (nodeType [] :toc)))
 
 (defn setLiteral [^CustomNode n lit]

diff --git a/src/nextjournal/markdown/impl/types/CustomNode.java b/src/nextjournal/markdown/impl/types/CustomNode.java
@@ -0,0 +1,12 @@
+package nextjournal.markdown.impl.types;
+
+// rebuild with:
+// javac src/nextjournal/markdown/impl/types/CustomNode.java
+
+public interface CustomNode {
+
+    public Object setLiteral(Object v);
+    public Object getLiteral();
+    public Object nodeType();
+
+}