Lispovská dmnc na dnešní den (diskuse)

[Marek Bernát]

(defun ones (l n)
  (if (zerop n) l (ones (append l '(1)) (- n 1))))

(heron 2 (ones nil 5))

Zátvorky v haiku? To je už trochu sadomaso

[Kyosuke]

Jedno lispovské haiku znám, je takové reklamní.

(unless (equalp
         (lisp-implementation-type)
         "SBCL") (quit))

[Marek Bernát]

Skúsim ho vylepšiť

(アンリス (イクオルプ
           (リスプ-イムプレンテイション-タイプ)
           "スブツル") (キト))

[Tom.š Ze.le.in]

[ot] #' už (od dob Ansi) není potřeba - lambda je makro

Možná by to šlo zhaikuovatět helpery typu compose a curry...

btw, něco (až na jméno) identického jsem psal předevčírem, když jsem se pokoušel pochopit partial evaluation :)

[Kyosuke]

Jsem precisní a konservativní tradicionalista.