AE
Щито поделать. Супер-экзотический язык, который в СНГ не был популярен никогда.
Size: a a a
2020 July 17
AE
Я тут добрался до твоего волкера.
AE
А он и не работает.
AE
(defmacro with-dot-syntax (single-form)
(labels ((expand (ls)
(if (= 2 (length ls))
`(slot-value ,(intern (cadr ls)) ',(intern (car ls)))
(destructuring-bind (head . tail) ls
`(slot-value ,(expand tail) ',(intern head)))))
(transform (name)
(if (not (keywordp name))
(let ((strname (string name)))
(if (and (/= 0 (count #\. strname :test #'char=))
(char/= #\. (char strname 0) (char strname (1- (length strname)))))
(expand (reverse (uiop:split-string strname :separator ".")))
name))
name))
(map-transform (object)
(if (atom object)
(transform object)
(mapcar #'map-transform object))))
(map-transform single-form)))
Вот эту версию взял.
YK
Кажется никого не было.
надо заманить сюда людей из Siscog и Ravenpack :)
YK
Щито поделать. Супер-экзотический язык, который в СНГ не был популярен никогда.
в совке был относительно популярен, как я слышал
YK
в Новосибирск даже сам МакКарти прилетал
YK
в 80-х даже собирали свои лисп-машины, но всё накрылось медным тазом и исчезло вместе с совком
d
https://en.m.wikipedia.org/wiki/Refal
Вот ещё советский лисп с упором на pattern matching
Вот ещё советский лисп с упором на pattern matching
YK
ага
YK
для рефала тоже делали специальное железо, и упоминание местных лисп-машин я как раз находил в статье про него
SD
Щито поделать. Супер-экзотический язык, который в СНГ не был популярен никогда.
Надо организовать команду, искать проекты, которым не важны технологии под капотом, и делать за деньги на лиспе.
SA
SA
не работает
SA
втф
SA
SA
починим
SA
аааааа