diff options
Diffstat (limited to 'utils/genapply/GenApply.hs')
-rw-r--r-- | utils/genapply/GenApply.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/genapply/GenApply.hs b/utils/genapply/GenApply.hs index c42ccb181a..e46b37afcf 100644 --- a/utils/genapply/GenApply.hs +++ b/utils/genapply/GenApply.hs @@ -602,7 +602,7 @@ genApply regstatus args = text "default: {", nest 4 ( - text "foreign \"C\" barf(\"" <> fun_ret_label <> text "\");" + text "foreign \"C\" barf(\"" <> fun_ret_label <> text "\") never returns;" ), text "}" |