anchor.diff:          eprintfn "Input path is missing."
           exit 1
       | Folder p1, Notknown -> processFolder p1 p1
  -    | File p1, Notknown -> processFile p1 p1 config    
  +    | File p1, Notknown -> processFile p1 p1 config
       | File p1, IO p2 ->
           processFile p1 p2 config
       | Folder p1, IO p2 -> processFolder p1 p2
  
positive.code:     let strictMode = ref false
  
      let handleOutput s =
          outputPath := IO s
  
      let handleStdOut() =
          outputPath := StdOut
  
      let handleInput s = 
  
negative.code:            ArgInfo("--pageWidth", ArgType.Int handlePageWidth, widthText);
             
             ArgInfo("--semicolonEOL", ArgType.Set semicolonEOL, semicolonEOLText);
             ArgInfo("--noSpaceBeforeArgument", ArgType.Clear spaceBeforeArgument, argumentText);
             ArgInfo("--noSpaceBeforeColon", ArgType.Clear spaceBeforeColon, colonText);
             ArgInfo("--noSpaceAfterComma", ArgType.Clear spaceAfterComma, commaText);
             ArgInfo("--noSpaceAfterSemiColon", ArgType.Clear spaceAfterSemiColon, semicolonText);
  