"Valeriy E. Ushakov" <uwe@netbsd.org> 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)))))