¿Por qué no hacer tu propio Lisp para la web?

Hay JavaScript, algo maravilloso. Y es hermoso en su mayor parte porque las herramientas de depuración y depuración están integradas en cada navegador. Sin un depurador y un inspector de árbol DOM, fue mucho más difícil desarrollar algo en JavaScript.


Así que decidí cortar mi Lisp, pero con un buen depurador. Tomé un pequeño y simple poco y lo refactoricé en un 99%. Lo agudicé mediante la ejecución paso a paso y creé mi propio IDE, simple pero funcional.


El resultado es el siguiente.


imagen

El lenguaje en sí resultó ser una mezcla de Lisp y JavaScript, porque no conocía bien a Lisp, pero JavaScript es bueno :)


Otros ejemplos de código.


(alert document.location.href)

(setq x "ok!") 
(alert (x.substring 0 2))

;;   if

(setq x (prompt "Value of X:"))
(if (x == null)
    (setq x "(none)")
    (alert (+ "x = " x))
:else
    (alert (+ "x = " x))
)

;;   while/if      

(setq i 0)
(while (i < 10)
    (console.log i)
    (++ i)
)

;;       

(x < 2)                ;; -> (< x 2)
((x < 2) && (x > -1))  ;; -> (&& (< x 2) (> x -1))
((x < 2) || (x > -1))  ;; -> (|| (< x 2) (> x -1))
(x + 1 2 3)            ;; -> (+ x 1 2 3) => x+1+2+3
(x ++)                 ;; -> (++ x) 
(++ x y z)             ;; ->   1  x, y, z 

;;    JS-

(setq obj1 (new Object))
(setq obj1.a 123 obj1.b "abc") ;;    

(setq name "c")
(setq obj1.@name ())           ;; @ - 
(setq obj1.@name.0 111)
(setq obj1.@name.1 222)
(setq obj1.@name.2 333) 

(alert (obj1.c.join " "))      ;;  "111 222 333"

;;  -   

(defclass 
    :extends Object
    :instvars "_ "
    :classvars ""
    :constructor init
)

(setq . 0)

(defmeth .init ( ) (
    (setq this. )
    (setq this._ )
    (. ++)
))

(defmeth . () (
    (window.alert (+ "  №" this. "  " this._ "   !"))
))

(setq 1 (new  9 " "))
(1.)
(alert (+ " : " .))

;;     

((lambda (x y) (alert (x + y)) "a" "b")

(defun f1 (x) (alert (x + " - ok!")))
(f1 "f1")

;;    -     JS-

((new Function "msg" "alert(msg);") document.title)

;;    

(catch (a.b)) ;;  Exception object (Error: "a" is undefined!)

En realidad, el proyecto github en sí está aquí: https://github.com/SaemonZixel/littlelisp.js


Al final, diré que el código está en fase beta hasta el momento (a partir del 17 de mayo de 2020). Hay muchos errores hasta ahora y lentamente los encuentro y los corrijo :(


¡Pero luego el depurador casi como en los entornos de desarrollo Smalltalk logró hacerlo! :)


Puede traer el código directamente en el depurador. Seleccione cualquier fragmento de código y vea el resultado o ejecute un depurador anidado.


All Articles