idris-lang/Idris2
1
1
Fork 0
mirror of https://github.com/idris-lang/Idris2.git synced 2024-09-11 13:36:08 +03:00
Code Issues Projects Releases Wiki Activity

[ error ] Fix error message for %defaulthint on a local function

Browse Source
This commit is contained in:
Steve Dunham 2023-11-23 14:30:05 -08:00
parent b65064a913
commit 1f54d68e86
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/TTImp/ProcessFnOpt.idr
View File

@ -49,7 +49,9 @@ processFnOpt fc _ ndef (Hint d)
addLocalHint ndef
processFnOpt fc True ndef (GlobalHint a)
= addGlobalHint ndef a
processFnOpt fc _ ndef (GlobalHint a)
processFnOpt fc _ ndef (GlobalHint True)
= throw (GenericMsg fc "%defaulthint is not valid in local definitions")
processFnOpt fc _ ndef (GlobalHint False)
= throw (GenericMsg fc "%globalhint is not valid in local definitions")
processFnOpt fc _ ndef ExternFn
= setFlag fc ndef Inline -- if externally defined, inline when compiling