From eea8880b2870c91006852fd47280094a0baae156 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Sun, 11 Sep 2011 14:38:06 -0400 Subject: [PATCH] Updated xml parsing modules to change default error-reporting behavior. --- src/xml_geometry.f90 | 4 ++-- src/xml_materials.f90 | 2 +- src/xml_settings.f90 | 2 +- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/xml_geometry.f90 b/src/xml_geometry.f90 index 285a1aa81f..97b5dd5055 100644 --- a/src/xml_geometry.f90 +++ b/src/xml_geometry.f90 @@ -632,7 +632,7 @@ subroutine read_xml_file_geometry_t(fname, lurep, errout) call init_xml_file_geometry_t call xml_open( info, fname, .true. ) - call xml_options( info, report_errors=.true., ignore_whitespace=.true.) + call xml_options( info, report_errors=.false., ignore_whitespace=.true.) lurep_ = 0 if ( present(lurep) ) then lurep_ = lurep @@ -650,7 +650,7 @@ subroutine read_xml_file_geometry_t(fname, lurep, errout) call xml_close(info) return endif - strict_ = .true. + strict_ = .false. error = .false. do call xml_get( info, tag, endtag, attribs, noattribs, data, nodata ) diff --git a/src/xml_materials.f90 b/src/xml_materials.f90 index dc5676487c..d747f3941b 100644 --- a/src/xml_materials.f90 +++ b/src/xml_materials.f90 @@ -735,7 +735,7 @@ subroutine read_xml_file_materials_t(fname, lurep, errout) call init_xml_file_materials_t call xml_open( info, fname, .true. ) - call xml_options( info, report_errors=.true., ignore_whitespace=.true.) + call xml_options( info, report_errors=.false., ignore_whitespace=.true.) lurep_ = 0 if ( present(lurep) ) then lurep_ = lurep diff --git a/src/xml_settings.f90 b/src/xml_settings.f90 index 243936be53..41a2c54ab5 100644 --- a/src/xml_settings.f90 +++ b/src/xml_settings.f90 @@ -536,7 +536,7 @@ subroutine read_xml_file_settings_t(fname, lurep, errout) call init_xml_file_settings_t call xml_open( info, fname, .true. ) - call xml_options( info, report_errors=.true., ignore_whitespace=.true.) + call xml_options( info, report_errors=.false., ignore_whitespace=.true.) lurep_ = 0 if ( present(lurep) ) then lurep_ = lurep