From b1d2a41e0d2c381b6c2ca3b4b8e68d364a390ecb Mon Sep 17 00:00:00 2001 From: VaclavT Date: Thu, 5 May 2022 18:41:22 +0200 Subject: [PATCH] empty debug.lsp --- debug.lsp | 19 ------------------- 1 file changed, 19 deletions(-) diff --git a/debug.lsp b/debug.lsp index 6b94275..e69de29 100644 --- a/debug.lsp +++ b/debug.lsp @@ -1,19 +0,0 @@ -(thread-create - (tcp-server 7777 (lambda (str) (list #f (+ "(print \"" (string-upcase str) "\")")))) -) - -(thread-sleep 1) - -(thread-create - (def code (tcp-client "127.0.0.1" 7777 ("abcd" "xyz"))) - (for c code - (print "executing code:" c) - (eval (parse c)) - ) - - (def code (tcp-client "127.0.0.1" 7777 "abcd")) - (print "executing code:" code) - (eval (parse code)) -) -(threads-join) -(print "ok")