Move implementations into impls/ dir

[jackhill/mal.git] / vb / step0_repl.vb

diff --git a/vb/step0_repl.vb b/vb/step0_repl.vb
deleted file mode 100644 (file)
index f53f378..0000000
--- a/vb/step0_repl.vb
+++ /dev/null
@@ -1,43 +0,0 @@
-Imports System
-Imports Mal
-
-Namespace Mal
-    Class step0_repl
-        ' read
-        Shared Function READ(str As String) As String
-            Return str
-        End Function
-
-        ' eval
-        Shared Function EVAL(ast As String, env As String) As String
-            Return ast
-        End Function
-        
-        ' print
-        Shared Function PRINT(exp As String) As String
-            Return exp
-        End Function
-
-        ' repl
-        Shared Function REP(str As String, env As String) As String
-            Return PRINT(EVAL(READ(str), env))
-        End Function
-
-        Shared Function Main As Integer
-            Dim prompt As String = "user> "
-            Dim line As String
-
-            Do
-                line = Mal.readline.Readline(prompt)
-                If line is Nothing Then
-                    Exit Do
-                End If
-                If line = "" Then
-                    Continue Do
-                End If
-                Console.WriteLine(REP(line, ""))
-            Loop While True
-            Return 0
-        End function
-    End Class
-End Namespace