Changeset 3207 for src/Pugs/Run/Args.hs
- Timestamp:
- 05/14/05 09:49:53 (4 years ago)
- svk:copy_cache_prev:
- 4718
- Files:
-
- 1 modified
-
src/Pugs/Run/Args.hs (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Run/Args.hs
r2750 r3207 18 18 -} 19 19 20 -- | Command line argument parser for pugs. 20 21 module Pugs.Run.Args (canonicalArgs 21 22 , gatherArgs … … 26 27 import Pugs.Internals 27 28 29 {- | 30 Convert command line arguments into canonical form for 31 'Pugs.Run.runWithArgs'. The switch ordering is defined 32 by compareArgs and is currently: 33 34 > (-h -v -V) (-I) (-d) (-w) (-c) (-C) (--external) (-M) (-n -p) (-l -0 -e other) 35 36 Args -M, -n and -p are converted to -e scripts by joinDashE. 37 -} 28 38 canonicalArgs :: [String] -> [String] 29 39 canonicalArgs x = concatMap procArg … … 67 77 68 78 {- 79 Enforce a canonical order of command line switches. Currently this is: 69 80 70 compareArgs enforces a canonical order of command line switches. 71 Currently this is: 72 73 (-h -v -V) (-I) (-d) (-w) (-c) (-C) (--external) (-M) (-n -p) (-l -0 -e other) 81 > (-h -v -V) (-I) (-d) (-w) (-c) (-C) (--external) (-M) (-n -p) (-l -0 -e other) 74 82 75 83 This makes pattern matching more convenient 76 84 77 85 Backwards incompatible changes: 78 -p and -n autochomp.79 -p uses say() instead of print()80 86 87 * -p and -n autochomp. 88 89 * -p uses say() instead of print() 81 90 -} 82 91
