<br />
<b>Deprecated</b>:  The each() function is deprecated. This message will be suppressed on further calls in <b>/home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php</b> on line <b>456</b><br />
;; $Id: cond.tst,v 1.4 2006/10/17 05:32:26 leavens Exp leavens $

(newline)
(displayln "Test case $RCSfile: cond.tst,v $ of $Date: 2006/10/17 05:32:26 $")
(newline)

(run-regression-tests-equal?
 `(
   ( (run "cond end") ==> 0 )
   ( (run "cond 1 ==> 3 end") ==> 3 )
   ( (run "cond 0 ==> 3 end") ==> 0 )
   ( (run "cond 0 ==> 5 1 ==> 3 end") ==> 3 )
   ( (run "+(7, cond 0 ==> 5 1 ==> 3 end)") ==> 10 )
   ( (run "cond equal?(3,4) ==> 5 equal?(2,3) ==> 2 1 ==> 3 end") ==> 3 )
   ( (run "cond equal?(3,3) ==> 5 equal?(2,3) ==> 2 1 ==> 3 end") ==> 5 )
   ( (run "cond equal?(3,3) ==> 5 equal?(2,2) ==> 2 1 ==> 3 end") ==> 5 )
   ( (run "cond equal?(2,3) ==> 5 equal?(2,2) ==> 2 1 ==> 3 end") ==> 2 )
   ( (run "cond equal?(2,3) ==> 5
                equal?(3,4) ==> 6
                equal?(4,5) ==> 7
                equal?(5,6) ==> 8
                equal?(7,8) ==> 10
                1 ==> 99
           end") ==> 99 )
   ))