mirror of
https://github.com/gren-lang/compiler.git
synced 2024-09-17 11:47:14 +03:00
Resolve some -Wall -Werror stuff
This commit is contained in:
parent
c224b36749
commit
4efbdd9710
@ -13,8 +13,6 @@ module Terminal.Args
|
||||
where
|
||||
|
||||
|
||||
import Control.Monad (filterM, when)
|
||||
import qualified Data.Char as Char
|
||||
import qualified Data.List as List
|
||||
import qualified Data.Maybe as Maybe
|
||||
import qualified System.Directory as Dir
|
||||
@ -99,8 +97,8 @@ complex intro outro interfaces =
|
||||
|
||||
|
||||
maybeAutoComplete :: [String] -> (Int -> [String] -> IO [String]) -> IO ()
|
||||
maybeAutoComplete args getSuggestions =
|
||||
if length args /= 3 then
|
||||
maybeAutoComplete argStrings getSuggestions =
|
||||
if length argStrings /= 3 then
|
||||
return ()
|
||||
else
|
||||
do maybeLine <- Env.lookupEnv "COMP_LINE"
|
||||
|
Loading…
Reference in New Issue
Block a user