<commit_before>module Main where

import           System.Directory   (createDirectoryIfMissing)
import           System.Environment (getArgs)
import           System.Exit        (exitFailure)
import           System.Exit        (exitSuccess)

import           Compiler
import           Deployer
import           Dispatch
import           Formatter
import           Parser
import           Paths
import           Types
import           Utils

main :: IO ()
main = do
    checkSystemConsistency

    as <- liftIO getArgs

    let config = loadConfig as
    let disp   = loadDispatcher as

    case disp of
        Left err -> putStrLn $ show err
        Right di -> do
            er <- runSparker config $ dispatch di<commit_msg>fixed command parsing now a card name reference is no longer necessary when supplying flags<commit_after>module Main where

import           System.Directory   (createDirectoryIfMissing)
import           System.Environment (getArgs)
import           System.Exit        (exitFailure)
import           System.Exit        (exitSuccess)

import           Data.List          (isPrefixOf)

import           Compiler
import           Deployer
import           Dispatch
import           Formatter
import           Parser
import           Paths
import           Types
import           Utils

main :: IO ()
main = do
    checkSystemConsistency

    as <- liftIO getArgs

    let (args, flags) = break ("-" `isPrefixOf`) as

    let config = loadConfig flags
    let disp   = loadDispatcher args

    case disp of
        Left err -> putStrLn $ show err
        Right di -> do
            er <- runSparker config $ dispatch di
{'fraction_non_alphanumeric': 0.04744525547445255, 'fraction_numerical': 0.0, 'mean_word_length': 1.7462437395659431, 'pattern_counts': {'":': 0, '<': 7, '<?xml version=': 0, '>': 7, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '7094595', 'n_tokens_mistral': 412, 'n_tokens_neox': 381, 'n_words': 148}