Size: a a a

2020 February 25

a

akater in Lisp Forever
> Why has it [restarts] not found its way into any "mainstream" languages (i.e. Java, Python, etc.)?

Back when Bjarne Stroustrup designed C++, he decided that "resumable" exceptions were too much trouble because they remove static guarantees […]

So he decided to take that power away from users of C++, even though it had been in earlier languages such as PL/I.

After Stroustrup, Lisp-style error handling became forgotten.

https://www.reddit.com/r/lisp/comments/d0vv00/comment/ezj09h6
источник

O

O in Lisp Forever
Pïg Grëënëst
господа, не долбимся в глаза, начальные условия не просто порубить список на чанки по 3 элемента
Да это только пример. Список любой длины на блоки любой длины
источник

O

O in Lisp Forever
Как и писал ранее все уложилось в loop for I on list
источник

V(

Vλadimir (Hawthorne the Toolmaker) in Lisp Forever
как перестать жать *Abort и начать юзать дебаггер?
источник

O

O in Lisp Forever
Открыл для себя on ни в одном примере не упоминается ни в кукбуке ни в pcl
источник

n

nconc in Lisp Forever
PCL (англ.) стр. 280
источник

n

nconc in Lisp Forever
источник

n

nconc in Lisp Forever
стр. 22
источник

O

O in Lisp Forever
Vλadimir (Hawthorne the Toolmaker)
как перестать жать *Abort и начать юзать дебаггер?
Там гулять как подсознанию можно
источник

O

O in Lisp Forever
nconc
PCL (англ.) стр. 280
http://www.gigamonkeys.com/book/loop-for-black-belts.html

да прыгнул туда Looping Over Collections and Packages
Я еще на функция торчу вначале
источник

O

O in Lisp Forever
источник

O

O in Lisp Forever
источник

PG

Pïg Grëënëst in Lisp Forever
источник

PG

Pïg Grëënëst in Lisp Forever
уверен кто-то из вас это уже видел
источник

ХЛ

Хороший Лисичко in Lisp Forever
+
источник

PG

Pïg Grëënëst in Lisp Forever
тем не менее, хотелось бы узнать мнения по поводу
источник

YK

Yaroslav Khnygin in Lisp Forever
мнение Райнера Йосвига:
источник

LL

Lämppi Lütti in Lisp Forever
Pïg Grëënëst
тем не менее, хотелось бы узнать мнения по поводу
Запустить не получилось 👌
источник
2020 February 26

O

O in Lisp Forever
Что вышло

(defun slide-list (list slide)
 "Convert a given LIST into subsequences with SLIDE parameter.

:LIST 1 2 3 4 5 6 7 8 9 10
:SLIDE 3

1 2 3
2 3 4
3 4 5
4 5 6
5 6 7
6 7 8
7 8 9
8 9 10"
 (if (endp list)
     (error "Required LIST is empty.")
     (loop
        :for l :on list
        :when (>= (length l) slide)
        :collect (subseq l 0 slide))))

(defun sum-list (list)
 "Return a sum of all numbers in a given list LIST."
 (check-type list (and list (not null)))
 (reduce #'+ list))

(defun max-subseq (list)
 "Return a subsequence and max value of a given LIST which
 `sum-list' value is maximized."
 (let ((max (loop
               :for l :in list
               :maximize (sum-list l))))
   (loop
      :for l :in list
      :when (= (sum-list l) max)
        :collect (list l max))))
источник

PG

Pïg Grëënëst in Lisp Forever
все таки length меня беспокоит
источник