Permalink
Browse files

Minor correction to test to pass on Intel

  • Loading branch information...
Toby White
Toby White committed Nov 14, 2007
1 parent 5cb5ddd commit 664681b05f734759cc804e3e3bfd721a6ff30697
Showing with 7 additions and 6 deletions.
  1. +4 −3 sax/test/test_sax_parser_1.f90
  2. +3 −3 sax/test/test_sax_parser_1.out
@@ -1,5 +1,6 @@
program test_sax_reader
+ use m_common_array_str
use m_sax_parser
use m_sax_reader
use m_sax_types
@@ -15,9 +16,9 @@ program test_sax_reader
call sax_parse(fx, fb)
- print*, fx%xds%xml_version
- print*, fx%xds%encoding
- print*, fx%xds%standalone
+ write(*,'(i0)'), fx%xds%xml_version
+ write(*,'(a)'), str_vs(fx%xds%encoding)
+ write(*,'(l1)'), fx%xds%standalone
call sax_parser_destroy(fx)
call close_file(fb)
@@ -1,3 +1,3 @@
- 11
- us-ascii
- T
+11
+us-ascii
+T

0 comments on commit 664681b

Please sign in to comment.