idris-lang/Idris2
1
1
Fork 0
mirror of https://github.com/idris-lang/Idris2.git synced 2024-12-18 16:51:51 +03:00
Code Issues Projects Releases Wiki Activity

fix error message for unexported fixities

Browse Source
This commit is contained in:
André Videla 2024-04-21 23:27:29 +01:00
parent 1dc7b74e4e
commit dd991861c1
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Idris/Desugar.idr
View File

@ -1021,6 +1021,7 @@ mutual
displayFixity : Maybe Visibility -> BindingModifier -> Fixity -> Nat -> OpStr -> String displayFixity : Maybe Visibility -> BindingModifier -> Fixity -> Nat -> OpStr -> String
displayFixity Nothing NotBinding fix prec op = "\{show fix} \{show prec} \{show op}" displayFixity Nothing NotBinding fix prec op = "\{show fix} \{show prec} \{show op}"
displayFixity Nothing bind fix prec op = "\{show bind} \{show fix} \{show prec} \{show op}" displayFixity Nothing bind fix prec op = "\{show bind} \{show fix} \{show prec} \{show op}"
displayFixity (Just vis) NotBinding fix prec op = "\{show vis} \{show fix} \{show prec} \{show op}"
displayFixity (Just vis) bind fix prec op = "\{show vis} \{show bind} \{show fix} \{show prec} \{show op}" displayFixity (Just vis) bind fix prec op = "\{show vis} \{show bind} \{show fix} \{show prec} \{show op}"
-- Given a high level declaration, return a list of TTImp declarations -- Given a high level declaration, return a list of TTImp declarations

4
tests/idris2/operators/operators009/expected
View File

@ -1,8 +1,8 @@
1/1: Building Test (Test.idr) 1/1: Building Test (Test.idr)
Warning: Fixity declaration 'infixr 0 =@' does not have an export modifier, and Warning: Fixity declaration 'infixr 0 =@' does not have an export modifier, and
will become private by default in a future version. will become private by default in a future version.
To expose it outside of its module, write 'export regular infixr 0 =@'. If you To expose it outside of its module, write 'export infixr 0 =@'. If you
intend to keep it private, write 'private regular infixr 0 =@'. intend to keep it private, write 'private infixr 0 =@'.
Test:2:1--2:12 Test:2:1--2:12
1 | 1 |