File: Windows.hs

package info (click to toggle)
haskell-path 0.9.6-4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 432 kB
  • sloc: haskell: 3,246; makefile: 3
file content (16 lines) | stat: -rw-r--r-- 433 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
{-# LANGUAGE CPP #-}

#define PLATFORM_NAME Windows
#include "Include.hs"

-- See https://learn.microsoft.com/en-us/dotnet/standard/io/file-path-formats
drives_ :: NonEmpty FilePath
drives_ = NonEmpty.fromList
  [ "C:\\" -- Common
  , "C:/" -- Common
  , "\\\\host" -- UNC
  --, "\\\\.\\C:\\" -- DOS Device Path
  , "\\\\?\\C:\\" -- DOS Device Path
  --, "\\\\?\\UNC\\" -- DOS Device Path
  --, "\\\\.\\UNC\\" -- DOS Device Path
  ]