# HG changeset patch # User jwe # Date 861780839 0 # Node ID 38ca4e62120c58158fb11174486deeb70d971d17 # Parent c3f7ed3874afd2a798e468eb40099e006cc9ba5e [project @ 1997-04-23 07:33:37 by jwe] diff --git a/test/octave.test/io/fprintf-2.m b/test/octave.test/io/fprintf-2.m --- a/test/octave.test/io/fprintf-2.m +++ b/test/octave.test/io/fprintf-2.m @@ -1,1 +1,1 @@ -fprintf ("foo") +fprintf (1) diff --git a/test/octave.test/io/fprintf-3.m b/test/octave.test/io/fprintf-3.m --- a/test/octave.test/io/fprintf-3.m +++ b/test/octave.test/io/fprintf-3.m @@ -1,1 +1,2 @@ -fprintf ("foo", "bar") +s.a = 1; +fprintf (s) diff --git a/test/octave.test/io/fprintf-4.m b/test/octave.test/io/fprintf-4.m new file mode 100644 --- /dev/null +++ b/test/octave.test/io/fprintf-4.m @@ -0,0 +1,1 @@ +fprintf (1, 1) diff --git a/test/octave.test/io/fprintf-5.m b/test/octave.test/io/fprintf-5.m new file mode 100644 --- /dev/null +++ b/test/octave.test/io/fprintf-5.m @@ -0,0 +1,1 @@ +fprintf (-1, "foo") diff --git a/test/octave.test/io/io.exp b/test/octave.test/io/io.exp --- a/test/octave.test/io/io.exp +++ b/test/octave.test/io/io.exp @@ -163,8 +163,16 @@ do_test fprintf-2.m set test fprintf-3 +set prog_output "\n... fprintf:.*" +do_test fprintf-3.m + +set test fprintf-4 set prog_output "error:.*" -do_test fprintf-3.m +do_test fprintf-4.m + +set test fprintf-5 +set prog_output "error:.*" +do_test fprintf-5.m set test fscanf-1 set prog_output "\n... fscanf:.*"