Removed an obsolete failing Rain test
This commit is contained in:
parent
5bc88ec1fc
commit
4c726352a4
|
@ -294,13 +294,7 @@ testParamPass1 = testParamPass "testParamPass1"
|
||||||
[A.ActualVariable (variable "x")]
|
[A.ActualVariable (variable "x")]
|
||||||
(Just [A.ActualVariable (variable "x")])
|
(Just [A.ActualVariable (variable "x")])
|
||||||
|
|
||||||
-- | Test up-casts:
|
-- testParamPass2 was no longer applicable
|
||||||
testParamPass2 :: Test
|
|
||||||
testParamPass2 = testParamPass "testParamPass2"
|
|
||||||
(Just [A.Formal A.ValAbbrev A.Int32 (simpleName "p0"),A.Formal A.ValAbbrev A.UInt32 (simpleName "p1")])
|
|
||||||
[A.ActualVariable (variable "x"),A.ActualVariable (variable "x")]
|
|
||||||
(Just [A.ActualExpression $ A.Conversion m A.DefaultConversion A.Int32 (exprVariable "x"),
|
|
||||||
A.ActualExpression $ A.Conversion m A.DefaultConversion A.UInt32 (exprVariable "x")])
|
|
||||||
|
|
||||||
-- | Test invalid implicit down-cast:
|
-- | Test invalid implicit down-cast:
|
||||||
testParamPass3 :: Test
|
testParamPass3 :: Test
|
||||||
|
@ -420,7 +414,6 @@ tests = TestLabel "RainPassesTest" $ TestList
|
||||||
,testFindMain2
|
,testFindMain2
|
||||||
,testParamPass0
|
,testParamPass0
|
||||||
,testParamPass1
|
,testParamPass1
|
||||||
,testParamPass2
|
|
||||||
,testParamPass3
|
,testParamPass3
|
||||||
,testParamPass4
|
,testParamPass4
|
||||||
,testParamPass5
|
,testParamPass5
|
||||||
|
|
Loading…
Reference in New Issue
Block a user