l
knet> ;Value: true
Size: a a a
2020 March 18
ХЛ
(eq (cdr '(5)) '())
l
knet> ERROR: Badly formatted arguments: [() ()]
ХЛ
(define subst (lambda (x y l) (if l (cons (if (eq (car l) x) y (car l)) (subst x y (cdr l))))))
l
knet> ;Value: subst
ХЛ
(susbt 'a 'b '(a b c d e f g))
l
knet> ERROR: Unbound variable: susbt
ХЛ
(subst 'a 'b '(a b c d e f g))
l
knet> ;Value: (() () () () () () ())
ХЛ
Аха
ХЛ
(eq 'a 'a)
l
knet> ERROR: Badly formatted arguments: [a a]
ХЛ
А как сравнивать символы?
AP
(eq 'a 'a)
l
knet> ;Value: true
AP
поправил
AZ
Я бы сразу вместо своего лиспа заюзал в боте например ecl
AP
Я бы сразу вместо своего лиспа заюзал в боте например ecl
А че не Guile? )
AZ
А че не Guile? )
ecl на винде вроде работает :)
YK
Я б не сказал, что вторая. По-моему CLISP живее. Ни на одном из своих двух компов я не смог скомпилировать clozurecl.
на маках вроде все пользуются Clozure