diff options
Diffstat (limited to 'utils/genapply/Main.hs')
| -rw-r--r-- | utils/genapply/Main.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/utils/genapply/Main.hs b/utils/genapply/Main.hs index d01b025b49..50904ea7c0 100644 --- a/utils/genapply/Main.hs +++ b/utils/genapply/Main.hs @@ -580,6 +580,7 @@ argRep V32 = text "V32_" argRep V64 = text "V64_" argRep _ = text "W_" +genApply :: RegStatus -> [ArgRep] -> Doc genApply regstatus args = let fun_ret_label = mkApplyRetName args @@ -776,6 +777,7 @@ genApply regstatus args = -- ----------------------------------------------------------------------------- -- Making a fast unknown application, args are in regs +genApplyFast :: RegStatus -> [ArgRep] -> Doc genApplyFast regstatus args = let fun_fast_label = mkApplyFastName args |