Skip to content

Commit f1e086c

Browse files
committed
change arguments to have coherent names
1 parent c868641 commit f1e086c

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

examples/adts.agda

+2-2
Original file line numberDiff line numberDiff line change
@@ -37,11 +37,11 @@ idRgb theArg = theArg
3737
-- const function with one named argument
3838

3939
rgbConstTrue1 : (rgb : Rgb) Bool
40-
rgbConstTrue1 foo = True
40+
rgbConstTrue1 rgb = True -- TODO produce function body
4141
{-# COMPILE AGDA2SCALA rgbConstTrue1 #-}
4242

4343
-- function with multiple named arguments
4444

4545
and0 : (rgbPairArg : RgbPair) -> (rgbArg : Rgb) -> Bool
46-
and0 a b = False
46+
and0 rgbPairArg rgbArg = False
4747
{-# COMPILE AGDA2SCALA and0 #-}

examples/adts.scala

+2-2
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@ final case class RgbPair(snd: Bool, fst: Rgb)
1313

1414
def idRgb(theArg: Rgb): Rgb = theArg
1515

16-
def rgbConstTrue1(rgb: Rgb): Bool = foo
16+
def rgbConstTrue1(rgb: Rgb): Bool = rgb
1717

18-
def and0(rgbArg: Rgb, rgbPairArg: RgbPair): Bool = a
18+
def and0(rgbArg: Rgb, rgbPairArg: RgbPair): Bool = rgbPairArg
1919
}

0 commit comments

Comments
 (0)