Parsing of dates via a separate yacc parser.
[gedcom-parse.git] / gedcom / interface.c
index c4db84bd4a05ae280b407a34fcabf312ab945d0d..5f7ceee13c06398cf0b90d399490155ecccb8548 100644 (file)
@@ -1,11 +1,22 @@
-/*  This program is free software; you can redistribute it and/or modify  *
- *  it under the terms of the GNU General Public License as published by  *
- *  the Free Software Foundation; either version 2 of the License, or     *
- *  (at your option) any later version.                                   *
+/* Implementation of the interface to applications.
+   Copyright (C) 2001 The Genes Development Team
+   This file is part of the Gedcom parser library.
+   Contributed by Peter Verthez <Peter.Verthez@advalvas.be>, 2001.
 
- (C) 2001 by The Genes Development Team
- Original author: Peter Verthez (Peter.Verthez@advalvas.be)
-*/
+   The Gedcom parser library is free software; you can redistribute it
+   and/or modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The Gedcom parser library is distributed in the hope that it will be
+   useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the Gedcom parser library; if not, write to the
+   Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
 
 /* $Id$ */
 /* $Name$ */
 #include "gedcom_internal.h"
 #include "interface.h"
 
-static Gedcom_rec_start_cb record_start_callback [LAST_REC] = { NULL };
-static Gedcom_rec_end_cb   record_end_callback   [LAST_REC] = { NULL };
-static Gedcom_elt_start_cb element_start_callback[LAST_ELT] = { NULL };
-static Gedcom_elt_end_cb   element_end_callback  [LAST_ELT] = { NULL };
-static Gedcom_def_cb       default_cb                       = NULL;
+static Gedcom_rec_start_cb record_start_callback [NR_OF_RECS] = { NULL };
+static Gedcom_rec_end_cb   record_end_callback   [NR_OF_RECS] = { NULL };
+static Gedcom_elt_start_cb element_start_callback[NR_OF_ELTS] = { NULL };
+static Gedcom_elt_end_cb   element_end_callback  [NR_OF_ELTS] = { NULL };
+static Gedcom_def_cb       default_cb                         = NULL;
 
 void gedcom_set_default_callback(Gedcom_def_cb func)
 {
@@ -78,3 +89,7 @@ void end_element(Gedcom_elt elt, Gedcom_ctxt parent, Gedcom_ctxt self,
     (*cb)(parent, self, parsed_value);
 }
 
+void gedcom_cast_error(char* file, int line)
+{
+  gedcom_warning(_("Wrong cast of value in file %s, at line %d"), file, line);
+}