anchor.diff:          writer.WriteLine ()
   
           // Emit constants for "end-of-input" and "tag of error terminal"
  -        // TODO
  +        intLiteralDecl ("_fsyacc_endOfInputTag", false,
  +            Map.find endOfInputTerminal tokenTags) writer
  +        intLiteralDecl ("_fsyacc_tagOfErrorTerminal", false,
  +            Map.find errorTerminal tokenTags) writer
  +        writer.WriteLine ()
   
           // Emit the token -> token-name function.
           quickSummary writer "Gets the name of a token as a string."
  
positive.code:                 | Some options ->
                      options
  
              // Generate the code and write it to the specified file.
              using (File.CreateText fsyaccOptions.OutputPath) <| fun streamWriter ->
                  use indentedTextWriter =
  
negative.code: 
          // Emit the symbolic nonterminal type declaration.
          quickSummary writer "This type is used to give symbolic names to token indexes, useful for error messages."
          do
              /// The symbolic nonterminals. All values in this map are None
              /// since the cases don't carry values.
              let symbolicNonterminals =
                  let symbolicNonterminals = valueMap symbolicNonterminalNames
                  // Add cases for the starting symbols.
                  (symbolicNonterminals, processedSpec.StartSymbols)
                  ||> Set.fold (fun symbolicNonterminals startSymbol ->
                      Map.add ("NONTERM__start" + startSymbol) None symbolicNonterminals)
  
                  // Write the type declaration.
              unionTypeDecl ("nonterminalId", false, symbolicNonterminals) writer
          writer.WriteLine ()
  
          /// Integer indices (tags) of terminals (tokens).
  