Add back switching on constants to the test
This commit is contained in:
parent
7bad3d5672
commit
034d9661b3
|
@ -14,7 +14,16 @@ Weekday: Int
|
|||
| friday = 6
|
||||
| saturday = 7
|
||||
|
||||
[printWeekday w:Weekday]
|
||||
[print s:String]
|
||||
[printWeekday w:Weekday] = [print switch w
|
||||
| Weekday.sunday 'sunday'
|
||||
| Weekday.monday 'monday'
|
||||
| Weekday.tuesday 'tuesday'
|
||||
| Weekday.wednesday 'wednesday'
|
||||
| Weekday.thursday 'thursday'
|
||||
| Weekday.friday 'friday'
|
||||
| Weekday.saturday 'saturday'
|
||||
* 'unknown']
|
||||
[f] = [printWeekday Weekday.monday]
|
||||
`)}
|
||||
|
||||
|
@ -30,7 +39,16 @@ Weekday: Int
|
|||
| friday
|
||||
| saturday
|
||||
|
||||
[printWeekday w:Weekday]
|
||||
[print s:String]
|
||||
[printWeekday w:Weekday] = [print switch w
|
||||
| Weekday.sunday 'sunday'
|
||||
| Weekday.monday 'monday'
|
||||
| Weekday.tuesday 'tuesday'
|
||||
| Weekday.wednesday 'wednesday'
|
||||
| Weekday.thursday 'thursday'
|
||||
| Weekday.friday 'friday'
|
||||
| Weekday.saturday 'saturday'
|
||||
* 'unknown']
|
||||
[f] = [printWeekday Weekday.monday]
|
||||
`)}
|
||||
|
||||
|
|
Loading…
Reference in New Issue