about summary refs log tree commit diff stats
path: root/echo.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'echo.lsp')
-rwxr-xr-xecho.lsp4
1 files changed, 2 insertions, 2 deletions
diff --git a/echo.lsp b/echo.lsp
index b299eab..0d78ed7 100755
--- a/echo.lsp
+++ b/echo.lsp
@@ -1,4 +1,4 @@
-#!/home/dbane/openlisp-11.0.0/uxlisp -shell
+#!/Users/dbane/openlisp-11.6.0/uxlisp -shell
 (require "json")
 (defpackage #:echo
   (:use #:openlisp #:json)
@@ -41,7 +41,7 @@
       (format s "~A" json))))
 (defun echo-server ()
    ;; Server side (server addr : 127.0.0.1)
-   (with-server-socket (server 8192 "tcp")
+   (with-server-socket (server 8192 :TCP)
         (let ((client (accept server)))
              ;; Talk with client using standard I/O.
              (with-standard-input client