| 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 |
| 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" |
| 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 |
| 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: |
| 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; |