Please enable JavaScript to use RhodeCode Enterprise
Commit Description:
Refactor.
Commit Description:
Refactor.
( ns project-checkup.core-property-test
( :gen-class )
( :require [ clojure.test :refer :all ]
[ project-checkup.core :refer :all ]
[ clojure.test.check :as tc ]
[ clojure.test.check.generators :as gen ]
[ clojure.test.check.properties :as prop ]
[ clojure.test.check.clojure-test :refer :all ]))
;arguably redundant
( defspec get-extension-returns-string
100
( prop/for-all [ st ( gen/not-empty gen/string-ascii )
ext ( gen/not-empty gen/string-alphanumeric ) ]
( string? ( get-extension ( str st \. ext ))) ))
( defspec get-extension-returns-extension
100
( prop/for-all [ st ( gen/not-empty gen/string-ascii )
ext ( gen/not-empty gen/string-alphanumeric ) ]
( = ( get-extension ( str st \. ext ))
( str \. ext )) ))
Site-wide shortcuts
/
Use quick search box
g h
Goto home page
g g
Goto my private gists page
g G
Goto my public gists page
n r
New repository page
n g
New gist page
Repositories
g s
Goto summary page
g c
Goto changelog page
g f
Goto files page
g F
Goto files page with file search activated
g p
Goto pull requests page
g o
Goto repository settings
g O
Goto repository permissions settings
