make check reults for octave 3.0.2 for mingw

[Tatsuro MATSUOKA]

Hello

I have tried to buid octave-3.0.2 on mingw.

In my case,

1.  d:\usr\Tatsu\mingwhome\octaves\octave-3.0.2\scripts/strings/mat2str.m  PASS 
   2/3    FAIL 1
2.  d:\usr\Tatsu\mingwhome\octaves\octave-3.0.2\src/ov-fcn-handle.cc  PASS    
2/3    FAIL 1
3.  test_string.m .......................................... PASS  130/131  
FAIL 1

and test_io.m hangs up during the tests but Benjamin did not report it so that 
I think it is not a
serious problem because Benjamin's binary to be official octave on mingw.

1. 
>>>>> processing 
>>>>> d:\usr\Tatsu\mingwhome\octaves\octave-3.0.2\scripts/strings/mat2str.m
  ***** assert (mat2str ([-1/3 +i/7; 1/3 -i/7], [4 2]), 
"[-0.3333+0i,0+0.14i;0.3333+0i,-0-0.14i]")
!!!!! test failed
error: assert (mat2str ([-1 / 3, +i / 7; 1 / 3, -i / 7], [4,
2]),"[-0.3333+0i,0+0.14i;0.3333+0i,-0-0.14i]") expected
[-0.3333+0i,0+0.14i;0.3333+0i,-0-0.14i]
but got
[-0.3333+0i,0+0.14i;0.3333+0i,0-0.14i]

Mmmmmm!  Is the difference  betwenn -0-0.14i and 0-0.14i meaningful?
   
2. This is already reported by Benjamin so I skipped here.

3.
  ***** test
 charset = setstr (0:127);
 
 result = zeros (1, 128);
 
 result (33:127) = 1;
 if (ispc () && ! isunix ())
   result(10) = 1;
 endif
 
 assert(all (isprint (charset) == result));
!!!!! test failed

 Benjamin has not reported as an error perhaps.  He has already attatched the 
patch that I vote before

Please see,
http://www.nabble.com/Octave-3.0.1-available-for-ftp-to16817195.html#a16920596
(Tatsuro MATSUOKA-2     Apr 27, 2008; 02:44pm)

So  I have report the patch as a changeset form.

**********************************
diff -r 4908e39553b0 ChangeLog
--- a/ChangeLog Tue Aug 19 16:15:52 2008 -0400
+++ b/ChangeLog Fri Aug 22 13:37:16 2008 +0900
@@ -1,3 +1,7 @@
+2008-08-22  Tatsuro MATSUOKA  <address@hidden>
+
+       test/octave.test/string/isprint-1.m in test_string.m for fixed.
+
 2008-08-19  Jaroslav Hajek <address@hidden>
 
        Version 3.0.2 released.
diff -r 4908e39553b0 test/test_string.m
--- a/test/test_string.m        Tue Aug 19 16:15:52 2008 -0400
+++ b/test/test_string.m        Fri Aug 22 13:37:16 2008 +0900
@@ -532,7 +532,7 @@
 %! result = zeros (1, 128);
 %! 
 %! result (33:127) = 1;
-%! if (ispc () && ! isunix ())
+%! if (size(findstr (octave_config_info('canonical_host_type'), 'msvc'),2))
 %!   result(10) = 1;
 %! endif
 %! 
**************************
After the patch is applied 
 /mingw make check 
  test_string.m .......................................... PASS  131/131

For Msvc corresondinpart test
octave-3.0.1.exe:8>  charset = setstr (0:127);
octave-3.0.1.exe:9>  result = zeros (1, 128);
octave-3.0.1.exe:10>  result (33:127) = 1;
<ave_config_info('canonical_host_type'), 'msvc'),2))
>    result(10) = 1;
>  endif
octave-3.0.1.exe:12>  assert(all (isprint (charset) == result));
octave-3.0.1.exe:13> all (isprint (charset) == result)
ans =  1
**************************************************

Please apply the changeset at 3.0.3. 

Regards.


Tatsuro

--------------------------------------
For All Sports Lovers! SPORTS OHEN PROJECT 2008
http://pr.mail.yahoo.co.jp/yells/