20 lines
416 B
Plaintext
20 lines
416 B
Plaintext
!import "prelude" !Local
|
|
!import "view" !Local
|
|
!import "views.catalog" !Local
|
|
|
|
-- Lowering of map-wrong-list.source.txt to portable typed-program metadata.
|
|
-- Symbols:
|
|
-- 160 map
|
|
-- 161 f
|
|
-- 162 xs
|
|
-- 163 partial
|
|
-- 164 out
|
|
|
|
program = listMapWrongListArgContract
|
|
|
|
main =
|
|
matchResult
|
|
(diag env : renderDiagnostic diag)
|
|
(env rest : "unexpected-ok")
|
|
(checkTypedProgramWith policyStrict program)
|