From af7c2e44f3bb3e52cea363c4188a39fc1924931f Mon Sep 17 00:00:00 2001
From: Hayleigh Thompson <me@hayleigh.dev>
Date: Sun, 22 May 2022 03:46:24 +0100
Subject: :construction: Experiment using monaco editor for the lustre
 playground.

---
 test/playground/main.gleam | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 test/playground/main.gleam

(limited to 'test/playground/main.gleam')

diff --git a/test/playground/main.gleam b/test/playground/main.gleam
new file mode 100644
index 0000000..6b7f7f7
--- /dev/null
+++ b/test/playground/main.gleam
@@ -0,0 +1,32 @@
+import gleam/io
+import lustre
+import lustre/attribute.{ Attribute, attribute }
+import lustre/element.{ Element }
+import playground/monaco
+
+pub type Action {
+    OnInput(String)
+}
+
+pub fn main () {
+    let init = "// Write some Gleam code here"
+
+    let update = fn (_, action) {
+        case action {
+            OnInput(input) ->
+                io.debug(input)
+        }
+    }
+
+    let render = fn (state) {
+        monaco.render([
+            attribute("value", state),
+            monaco.on_change(fn (code, dispatch) {
+                dispatch(OnInput(code))
+            })
+        ])
+    }
+
+    lustre.simple(init, update, render)
+        |> lustre.start("[data-lustre-container]")
+}
-- 
cgit v1.2.3