module Cloudy.Cmd.Aws where import Cloudy.LocalConfFile (LocalConfFileOpts) import Cloudy.Cli (AwsCliOpts (..)) import Cloudy.Cli.Aws (AwsCreateCliOpts (..), AwsListInstanceTypesCliOpts (..)) runAws :: LocalConfFileOpts -> AwsCliOpts -> IO () runAws :: LocalConfFileOpts -> AwsCliOpts -> IO () runAws LocalConfFileOpts localConfFileOpts = \case AwsCreate AwsCreateCliOpts awsCreateCliOpts -> LocalConfFileOpts -> AwsCreateCliOpts -> IO () runAwsCreate LocalConfFileOpts localConfFileOpts AwsCreateCliOpts awsCreateCliOpts AwsListInstanceTypes AwsListInstanceTypesCliOpts awsListInstanceTypesCliOpts -> LocalConfFileOpts -> AwsListInstanceTypesCliOpts -> IO () runAwsListInstanceTypes LocalConfFileOpts localConfFileOpts AwsListInstanceTypesCliOpts awsListInstanceTypesCliOpts runAwsCreate :: LocalConfFileOpts -> AwsCreateCliOpts -> IO () runAwsCreate :: LocalConfFileOpts -> AwsCreateCliOpts -> IO () runAwsCreate LocalConfFileOpts _localConfFileOpts AwsCreateCliOpts _createCliOpts = IO () forall a. HasCallStack => a undefined runAwsListInstanceTypes :: LocalConfFileOpts -> AwsListInstanceTypesCliOpts -> IO () runAwsListInstanceTypes :: LocalConfFileOpts -> AwsListInstanceTypesCliOpts -> IO () runAwsListInstanceTypes LocalConfFileOpts _localConfFileOpts AwsListInstanceTypesCliOpts _listInstanceTypesCliOpts = IO () forall a. HasCallStack => a undefined