@@ -209,10 +209,16 @@ parseFlags = many $
209209 <|> flag' (AddOpt PETransform) (long "partial-eval")
210210 <|> flag' (RemoveOpt PETransform) (long "no-partial-eval" <> help "Switch off partial evaluation, mainly for debugging purposes")
211211
212− <|> flag' (AddOpt GeneralisedNatHack) (long "opt-nat-likes"
213− <> help "Enable compilation of Nat-like types to bigints")
214− <|> flag' (RemoveOpt GeneralisedNatHack) (long "no-opt-nat-likes"
215− <> help "Disable compilation of Nat-like types to bigints")
212+ <|> flag' (AddOpt GeneralisedNatHack) (
213+ long "optimise-nat-like-types"
214+ <> long "optimize-nat-like-types"
215+ <> help "Enable compilation of Nat-like types to bigints"
216+ )
217+ <|> flag' (RemoveOpt GeneralisedNatHack) (
218+ long "no-optimise-nat-like-types"
219+ <> long "no-optimize-nat-like-types"
220+ <> help "Disable compilation of Nat-like types to bigints"
221+ )
216222
217223 <|> OptLevel <$> option auto (short 'O' <> long "level")
218224