anchor.diff:  	  do (test-count-if-2 predicate sequence -1 index)
   	     (test-count-if-2 predicate sequence index -1))
       (loop for start from 0 to length
  -	  do (loop for end from 0 to length
  +	  do (loop for end from start to length
   		   do (test-count-if-2 predicate sequence start end)))))
   
   (define-test |count-if normal|
  
positive.code: 	  do (test-find-3 item sequence test -1 index)
  	     (test-find-3 item sequence test index -1))
      (loop for start from 0 to length
  	  do (loop for end from 0 to length
  		   do (test-find-3 item sequence test start end)))))
      
  (define-test |find normal|
  
negative.code: 	  do (test-position-if-2 predicate sequence -1 index)
  	     (test-position-if-2 predicate sequence index -1))
      (loop for start from 0 to length
  	  do (loop for end from start to length
  		   do (test-position-if-2 predicate sequence start end)))))
      
  (define-test |position-if normal|
  