/[ghosts]/ghosts/gedcomparser/src/GEDCOMParser/DateManagement/datevalueparser.yxx
ViewVC logotype

Diff of /ghosts/gedcomparser/src/GEDCOMParser/DateManagement/datevalueparser.yxx

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.2.2 by cpcp, Wed Oct 23 21:14:00 2002 UTC revision 1.1.2.3 by cpcp, Sun Oct 27 09:45:01 2002 UTC
# Line 1  Line 1 
1  /**  /*
2      Copyright 2002 Cyril Picard      Copyright 2002 Cyril Picard
3    
4      This file is part of the GEDCOMParser library      This file is part of the GEDCOMParser library
# Line 18  Line 18 
18      along with the GEDCOMParser library ; if not, write to the Free Software      along with the GEDCOMParser library ; if not, write to the Free Software
19      Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA      Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20    
21  **/  */
22    
23  %{  %{
24  #include "GEDCOMParser/DateManagement/datevalueparser_decl.hh"  #include "GEDCOMParser/DateManagement/datevalueparser_decl.hh"
# Line 87  std::string _parsed_string; Line 87  std::string _parsed_string;
87  %token  MONTH_FREN_THER  %token  MONTH_FREN_THER
88  %token  MONTH_FREN_FRUC  %token  MONTH_FREN_FRUC
89  %token  MONTH_FREN_COMP  %token  MONTH_FREN_COMP
90    %token  AN
91    %token  FRENCH_YEAR
92  %token  FROM  %token  FROM
93  %token  TO  %token  TO
94  %token  BEF  %token  BEF
# Line 453  date_fren: Line 455  date_fren:
455            if (_date == 0)            if (_date == 0)
456              _date = new GEDCOMParser::DateManagement::Date();              _date = new GEDCOMParser::DateManagement::Date();
457            _date->setDay($1);            _date->setDay($1);
458              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Decimal);
459            _date->setYear($5);            _date->setYear($5);
460          }          }
461          | month_fren SPACE NUMBER          | month_fren SPACE NUMBER
462          {          {
463            if (_date == 0)            if (_date == 0)
464              _date = new GEDCOMParser::DateManagement::Date();              _date = new GEDCOMParser::DateManagement::Date();
465              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Decimal);
466            _date->setYear($3);            _date->setYear($3);
467          }          }
468          |NUMBER          |NUMBER
469          {          {
470            if (_date == 0)            if (_date == 0)
471              _date = new GEDCOMParser::DateManagement::Date();              _date = new GEDCOMParser::DateManagement::Date();
472              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Decimal);
473            _date->setYear($1);            _date->setYear($1);
474          }          }
475            | NUMBER SPACE month_fren SPACE AN FRENCH_YEAR
476            {
477              if (_date == 0)
478                _date = new GEDCOMParser::DateManagement::Date();
479              _date->setDay($1);
480              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
481              _date->setYear($6);
482            }
483            | month_fren SPACE AN FRENCH_YEAR
484            {
485              if (_date == 0)
486                _date = new GEDCOMParser::DateManagement::Date();
487              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
488              _date->setYear($4);
489            }
490            | AN FRENCH_YEAR
491            {
492              if (_date == 0)
493                _date = new GEDCOMParser::DateManagement::Date();
494              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
495              _date->setYear($2);
496            }
497            | NUMBER SPACE month_fren SPACE FRENCH_YEAR
498            {
499              if (_date == 0)
500                _date = new GEDCOMParser::DateManagement::Date();
501              _date->setDay($1);
502              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
503              _date->setYear($5);
504            }
505            | month_fren SPACE FRENCH_YEAR
506            {
507              if (_date == 0)
508                _date = new GEDCOMParser::DateManagement::Date();
509              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
510              _date->setYear($3);
511            }
512            | FRENCH_YEAR
513            {
514              if (_date == 0)
515                _date = new GEDCOMParser::DateManagement::Date();
516              _date->setFrenchYearFormat(GEDCOMParser::DateManagement::Date::e_FrenchYearFormat_Roman);
517              _date->setYear($1);
518            }
519    
520    
521            
522          ;          ;
523    
524  month_fren:  month_fren:
# Line 684  void datevalue_error(char * const s) Line 736  void datevalue_error(char * const s)
736  void datevalue_runparse(std::string const &s, GEDCOMParser::DateManagement::DateValue * date_value, int debug = 0)  void datevalue_runparse(std::string const &s, GEDCOMParser::DateManagement::DateValue * date_value, int debug = 0)
737  {  {
738    _parsed_string = s;    _parsed_string = s;
739    yydebug = debug;  //  yydebug = debug;
740     yydebug = 1;
741    _date = 0;    _date = 0;
742    _date_period = 0;    _date_period = 0;
743    _date_range = 0;    _date_range = 0;

Legend:
Removed from v.1.1.2.2  
changed lines
  Added in v.1.1.2.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26