Тест

Тест, ага. Я наконец решился прикрутить сюда highlight.js, и вот тестирую, как оно будет работать с лиспом, потому что собираюсь выкладывать свои решения для заданий из SICP (позже расскажу, что это такое, зачем и какого фига).

Раз:

(* (cond ((> a b) a)
         ((< a b) b)
         (else -1))
   (+ a 1))

И два:

(define (p) (p))
(define (test x y)
  (if (= x 0)
      0
      y))

Upd. Как оказалось, он одинаково хорошо работает, независимо от того, указываю ли я явно, что это именно лисп. А вот PHP иногда путает с Perl.

Авг. 08, 2008 // 12:37 | Комментарии (8)