anchor.diff:          let parserSpec =
               try
                   let stream, reader, lexbuf =
  -                    UnicodeFileAsLexbuf (inputFile, None)
  +                    UnicodeFileAsLexbuf (inputFile, inputCodePage)
                   use stream = stream
                   use reader = reader
                   let parserSpec = Parser.spec Lexer.token lexbuf
  
positive.code:                 OpenDeclarations = openDeclarations.ToArray ();
                  InternalModule = !internalModule;
                  };
              })
          
  
          
  
negative.code:                 ArgInfo.Create ("--parslib", ArgType.String (fun s -> parserInterpreterNamespace := Some s),
                      sprintf "Specify the namespace for the implementation of the parser table interpreter. \
                       The default is '%s'." defaultParserInterpreterNamespace);
                  ArgInfo.Create ("--codepage", ArgType.Int (fun i -> inputCodePage := Some i),
                      "Assume input lexer specification file is encoded with the given codepage.");
                  |]
  
          // Parses argument values which aren't specified by flags.
  