anchor.diff:        InsertParam( ['c', 'only-common-rows'], false, '', 'Only outputs a line if the Unique field exists in');
         InsertUsage( '                                 both file ''1'' and file ''2'' and new');
         InsertUsage( '                                 spreadsheets');
  +      InsertParam( ['int32'], false, '', 'The unique field is a signed 32 bit integer');
  +      InsertUsage( '                                 value.');
  +      InsertParam( ['int64'], false, '', 'The unique field is a signed 64 bit integer');
  +      InsertUsage( '                                 value.');
  +      InsertParam( ['word32'], false, '', 'The unique field in a unsigned 32 bit integer');
  +      InsertUsage( '                                 value.');
  +      InsertParam( ['word64'], false, '', 'The unique field in a unsigned 64 bit integer');
  +      InsertUsage( '                                 value.  This is the default type.');
  +      InsertParam( ['text'], false, '', 'The unique field in a simple text value.');
         InsertUsage();
   
         ParseParams();  // parse the command line
  
positive.code: 
  procedure InitArgvParser();
     begin
        InsertUsage( '');
        InsertUsage( 'csv_diff reads two CSV files and compares the fields in the passed header.  It');
        InsertUsage( '         outputs outputs the ''--unique'' field, the ''1'' header fields, and');
  
negative.code: // * main()
  // ************************************************************************
  
  begin
     InitArgvParser();
     InitVars();
  
     CompareFiles( Csv1, Csv2); 
  
     Csv1.Destroy;
     Csv2.Destroy;
  end.  // csv_diff program
  