Source-Changes archive
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]
Re: CVS commit: src/sys/ddb
"Valeriy E. Ushakov" <uwe%netbsd.org@localhost> writes:
> Module Name: src
> Committed By: uwe
> Date: Sun Jan 22 00:47:50 UTC 2006
>
> Modified Files:
> src/sys/ddb: db_xxx.c
>
> Log Message:
> This is not IOCCC. Replace " >"[cp == p] with conditional expression.
And the IOCCC way would be more like '>'&'>'<<4*(cp!=p).
--
(let ((C call-with-current-continuation)) (apply (lambda (x y) (x y)) (map
((lambda (r) ((C C) (lambda (s) (r (lambda l (apply (s s) l)))))) (lambda
(f) (lambda (l) (if (null? l) C (lambda (k) (display (car l)) ((f (cdr l))
(C k))))))) '((#\J #\d #\D #\v #\s) (#\e #\space #\a #\i #\newline)))))
Home |
Main Index |
Thread Index |
Old Index