We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent fb8d09e commit 2b7e44cCopy full SHA for 2b7e44c
examples/adts.agda
@@ -42,6 +42,7 @@ rgbConstTrue1 rgb = True -- TODO produce function body
42
43
-- function with multiple named arguments
44
45
-and0 : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> RgbPair
46
-and0 rgbPairArg rgbArg = rgbPairArg
47
-{-# COMPILE AGDA2SCALA and0 #-}
+constRgbPair : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> RgbPair
+constRgbPair rgbPairArg rgbArg = rgbPairArg
+{-# COMPILE AGDA2SCALA constRgbPair #-}
48
+ľ
0 commit comments