Mercurial > hg > octave-nkf
diff scripts/testfun/test.m @ 7244:5a9561046b89
[project @ 2007-12-04 02:27:27 by jwe]
author | jwe |
---|---|
date | Tue, 04 Dec 2007 02:27:27 +0000 |
parents | e8d7eed42935 |
children | 3422f39573b1 |
line wrap: on
line diff
--- a/scripts/testfun/test.m +++ b/scripts/testfun/test.m @@ -480,8 +480,8 @@ fputs (__fid, __msg); fflush (__fid); ## show the variable context - if (! strcmp (__type, "error") && ! strcmp (__type, "testif") && - ! all (__shared == " ")) + if (! strcmp (__type, "error") && ! strcmp (__type, "testif") + && ! all (__shared == " ")) fputs (__fid, "shared variables "); eval (sprintf ("fdisp(__fid,bundle(%s));", __shared)); fflush (__fid);