From 9c363a2a66f446f474dc3e87d2b0dfaf684667f2 Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Mon, 18 Nov 2024 05:07:26 -0500
Subject: Let's not be silly with our JSON

---
 src/UI.purs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/UI.purs')

diff --git a/src/UI.purs b/src/UI.purs
index 49d797a..17d1ca1 100644
--- a/src/UI.purs
+++ b/src/UI.purs
@@ -11,3 +11,7 @@ cheatLog x = liftEffect $ _cheatLog x
 foreign import _setInterval :: Number -> Effect Unit -> Effect Unit
 setInterval :: forall m. MonadEffect m => Number -> Effect Unit -> m Unit
 setInterval d f = liftEffect $ _setInterval d f
+
+foreign import _toJSON :: forall a. a -> String
+toJSON :: forall a. a -> String
+toJSON = _toJSON
-- 
cgit v1.2.3