From 37c0a0b5e4d3939656cac8d103b5a22963fbc9dd Mon Sep 17 00:00:00 2001
From: Brian Cully <bjc@spork.org>
Date: Mon, 25 Aug 2025 13:35:12 -0400
Subject: load forth from server

---
 site/index.html | 17 +++++------------
 1 file changed, 5 insertions(+), 12 deletions(-)

(limited to 'site/index.html')

diff --git a/site/index.html b/site/index.html
index 6583568..5939d37 100644
--- a/site/index.html
+++ b/site/index.html
@@ -10,20 +10,13 @@
 
     <div id='editor'>
       <div id='code'>
+        <select id='src-select'>
+          <option>fac.fs</option>
+          <option>slo-fac.fs</option>
+        </select>
         <button id='compile'>compile</button>
         <br>
-        <div id='src' contenteditable='plaintext-only'>: fac ( n -- n )
-	dup		( n n )
-	1 > if		( n flag )
-		dup	( n n )
-		1 -		( n n-1 )
-		fac		( n fac-n )
-		*		( n )
-	then		( n )
-;
-
-5 fac
-drop</div>
+        <div id='src' contenteditable='plaintext-only'></div>
       </div>
 
       <div id='state-container'>
-- 
cgit v1.3