@@ -312,10 +312,6 @@ tests =
312
312
,(" uncurry W.addExtension (W.splitExtensions x) == x" , property $ \ (QFilePathValidW x) -> uncurry W. addExtension (W. splitExtensions x) == x)
313
313
,(" uncurry AFP_P.addExtension (AFP_P.splitExtensions x) == x" , property $ \ (QFilePathValidAFP_P x) -> uncurry AFP_P. addExtension (AFP_P. splitExtensions x) == x)
314
314
,(" uncurry AFP_W.addExtension (AFP_W.splitExtensions x) == x" , property $ \ (QFilePathValidAFP_W x) -> uncurry AFP_W. addExtension (AFP_W. splitExtensions x) == x)
315
- ,(" P.splitExtensions \" file.tar.gz\" == (\" file\" , \" .tar.gz\" )" , property $ P. splitExtensions " file.tar.gz" == (" file" , " .tar.gz" ))
316
- ,(" W.splitExtensions \" file.tar.gz\" == (\" file\" , \" .tar.gz\" )" , property $ W. splitExtensions " file.tar.gz" == (" file" , " .tar.gz" ))
317
- ,(" AFP_P.splitExtensions (\" file.tar.gz\" ) == ((\" file\" ), (\" .tar.gz\" ))" , property $ AFP_P. splitExtensions (" file.tar.gz" ) == ((" file" ), (" .tar.gz" )))
318
- ,(" AFP_W.splitExtensions (\" file.tar.gz\" ) == ((\" file\" ), (\" .tar.gz\" ))" , property $ AFP_W. splitExtensions (" file.tar.gz" ) == ((" file" ), (" .tar.gz" )))
319
315
,(" P.dropExtensions \" /directory/path.ext\" == \" /directory/path\" " , property $ P. dropExtensions " /directory/path.ext" == " /directory/path" )
320
316
,(" W.dropExtensions \" /directory/path.ext\" == \" /directory/path\" " , property $ W. dropExtensions " /directory/path.ext" == " /directory/path" )
321
317
,(" AFP_P.dropExtensions (\" /directory/path.ext\" ) == (\" /directory/path\" )" , property $ AFP_P. dropExtensions (" /directory/path.ext" ) == (" /directory/path" ))
0 commit comments