Skip to content

Commit 2b7e44c

Browse files
committed
rename and0 to constRgbPair
1 parent fb8d09e commit 2b7e44c

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

examples/adts.agda

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -42,6 +42,7 @@ rgbConstTrue1 rgb = True -- TODO produce function body
4242

4343
-- function with multiple named arguments
4444

45-
and0 : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> RgbPair
46-
and0 rgbPairArg rgbArg = rgbPairArg
47-
{-# COMPILE AGDA2SCALA and0 #-}
45+
constRgbPair : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> RgbPair
46+
constRgbPair rgbPairArg rgbArg = rgbPairArg
47+
{-# COMPILE AGDA2SCALA constRgbPair #-}
48+
ľ

0 commit comments

Comments
 (0)