drym-org / qi / #83

coverage: 67.046% (-28.6%) from 95.664%
#83

push

cover

web-flow 
Merge pull request #127 from countvajhula/phase-shifting

Phase shifting

184 of 333 new or added lines in 5 files covered. (55.26%)

305 existing lines in 10 files now uncovered.

1178 of 1757 relevant lines covered (67.05%)

0.67 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

76.67
/qi-lib/flow/extended/impl.rkt
1 
#lang racket/base
1✔
2 









3



(require (only-in racket/function




1✔





4



                  const))




1✔





5












6



(provide ->boolean




1✔





7



         true.




1✔





8



         false.




1✔





9



         ~all?




1✔





10



         ~any?




1✔





11



         ~none?




1✔





12



         ~count




1✔





13



         ~live?)




1✔





14













UNCOV

15



(define (->boolean v) (and v #t))




×







16












17



(define true.




1✔





18



  (procedure-rename (const #t)




1✔





19



                    'true.))




1✔





20












21



(define false.




1✔





22



  (procedure-rename (const #f)




1✔





23



                    'false.))




1✔





24












25



(define (~all? . args)




1✔






UNCOV

26



  (for/and ([v (in-list args)]) v))




×







27












28



(define (~any?-helper args)




1✔






UNCOV

29



  (for/or ([v (in-list args)]) v))




×







30












31



(define (~any? . args)




1✔






UNCOV

32



  (~any?-helper args))




×







33












34



(define (~none? . args)




1✔






UNCOV

35



  (not (~any?-helper args)))




×







36












37



(define (~count . args)




1✔






UNCOV

38



  (length args))




×







39












40



(define (~live? . args)




1✔






UNCOV

41



  (not (null? args)))




×





















    

  • 

    •