c6b6286aec8ffbd0a8948587e3e8ef87baf0abf147863f4c25a8956b73945546

Download raw

Created: 2023-12-19 03:40:10.302489 UTC

Size: 528

Preview (limited to 512 bytes)

"#!/bin/sh\n\nset -e\n\nCABAL=${CABAL:-cabal}\nHC=${HC:-ghc}\n\n# Install cpphs if it is not in path\ncommand -v cpphs || ${CABAL} v2-install --ignore-project --with-compiler \"$HC\" cpphs\n\n# Regenerate quickcheck-hugs\nsh make-hugs\nfind quickcheck-hugs\n\ndie() {\n echo \"TEST FAILED\"\n exit 1\n}\n\ndotest() {\n echo \"$2\" | hugs -98 -Pquickcheck-hugs: -p'> ' \"$1\" | tee hugs.output\n grep \"$3\" hugs.output || die\n}\n\n# Simple tests\ndotest Test.QuickCheck 'quickCheck $ \\xs -> reverse (reverse xs) === (xs :: [Int])' \"OK, pas"

Casa is a service provided by the Haskell Foundation │ Originally developed by FP Complete