hasufell/ghcup-hs
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Improve platform parser

Browse Source
This commit is contained in:
Julian Ospald 2020-03-17 18:39:20 +01:00
parent 8a1bd45ffe
commit fcb7129251
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
app/ghcup/Main.hs
View File

@ -416,6 +416,7 @@ platformParser s' = case MP.parse (platformP <* MP.eof) "" (T.pack s') of
distroP :: MP.Parsec Void Text LinuxDistro distroP :: MP.Parsec Void Text LinuxDistro
distroP = choice' distroP = choice'
[ MP.chunk [s|debian|] $> Debian [ MP.chunk [s|debian|] $> Debian
, MP.chunk [s|deb|] $> Debian
, MP.chunk [s|ubuntu|] $> Ubuntu , MP.chunk [s|ubuntu|] $> Ubuntu
, MP.chunk [s|mint|] $> Mint , MP.chunk [s|mint|] $> Mint
, MP.chunk [s|fedora|] $> Fedora , MP.chunk [s|fedora|] $> Fedora