Lines Matching refs:help
156 datatype cline_record = CR of { quiet : bool, action : action, help : bool}
157 val init = CR {quiet = false, action = Fix, help = false}
158 fun quiet_upd b (CR {action, help, ...}) =
159 CR {action = action, quiet = b, help = help}
160 fun act_upd a (CR {quiet, help, ...}) =
161 CR {action = a, quiet = quiet, help = help}
163 CR {action = action, quiet = quiet, help = b}
167 {short = "h", long = ["help"], desc = NoArg (fn () => help_upd true),
168 help = "Show this message"},
170 help = "be quieter"},
172 help = "No action; just list files (overrides -q)"},
174 help = "No action; list files and lines"}]
186 val CR {quiet, action, help} =
188 val _ = not help orelse