From e72cd50873cd54f9f4a55b4f02a70753543c2464 Mon Sep 17 00:00:00 2001 From: CrossNox Date: Sun, 27 Nov 2022 13:14:09 -0300 Subject: [PATCH] fix code --- src/rustint/core.clj | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/src/rustint/core.clj b/src/rustint/core.clj index 39c826b..8266d9c 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -2018,9 +2018,13 @@ ; 0 nil ; nil ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defn dump [&args] - (print "\n0 [POPREF 2]\n1 [PUSHFI 2]\n2 MUL\n3 [PUSHFI 1]\n4 ADD\n5 NEG\nnil") - nil + +(defn format_elem [idx itm] + (format "%d %s" idx itm) +) + +(defn dump [args] + (dorun (map println (map-indexed format_elem args))) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;