File tree 2 files changed +4
-4
lines changed
2 files changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -37,11 +37,11 @@ idRgb theArg = theArg
37
37
-- const function with one named argument
38
38
39
39
rgbConstTrue1 : (rgb : Rgb) → Bool
40
- rgbConstTrue1 foo = True
40
+ rgbConstTrue1 rgb = True -- TODO produce function body
41
41
{-# COMPILE AGDA2SCALA rgbConstTrue1 #-}
42
42
43
43
-- function with multiple named arguments
44
44
45
45
and0 : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> Bool
46
- and0 a b = False
46
+ and0 rgbPairArg rgbArg = False
47
47
{-# COMPILE AGDA2SCALA and0 #-}
Original file line number Diff line number Diff line change @@ -13,7 +13,7 @@ final case class RgbPair(snd: Bool, fst: Rgb)
13
13
14
14
def idRgb (theArg : Rgb ): Rgb = theArg
15
15
16
- def rgbConstTrue1 (rgb : Rgb ): Bool = foo
16
+ def rgbConstTrue1 (rgb : Rgb ): Bool = rgb
17
17
18
- def and0 (rgbArg : Rgb , rgbPairArg : RgbPair ): Bool = a
18
+ def and0 (rgbArg : Rgb , rgbPairArg : RgbPair ): Bool = rgbPairArg
19
19
}
You can’t perform that action at this time.
0 commit comments