# HG changeset patch # User John W. Eaton # Date 1310852251 14400 # Node ID a12569d5906edafd5582164046ef45cf32bf1947 # Parent 9f0f2c22605384a0b11217829281a6254365724d codesprint: new tests for ispc, ismac, isunix * ismac.m, ispc.m, isunix.m: Trivial new tests. diff --git a/scripts/miscellaneous/ismac.m b/scripts/miscellaneous/ismac.m --- a/scripts/miscellaneous/ismac.m +++ b/scripts/miscellaneous/ismac.m @@ -32,3 +32,5 @@ endfunction +%!error ismac (1); +%!assert (islogical (ismac ())); diff --git a/scripts/miscellaneous/ispc.m b/scripts/miscellaneous/ispc.m --- a/scripts/miscellaneous/ispc.m +++ b/scripts/miscellaneous/ispc.m @@ -31,3 +31,6 @@ endif endfunction + +%!error ispc (1); +%!assert (islogical (ispc ())); diff --git a/scripts/miscellaneous/isunix.m b/scripts/miscellaneous/isunix.m --- a/scripts/miscellaneous/isunix.m +++ b/scripts/miscellaneous/isunix.m @@ -31,3 +31,6 @@ endif endfunction + +%!error isunix (1); +%!assert (islogical (isunix ()));