test/Tools/isac/OLDTESTS/modspec.sml
branchisac-update-Isa09-2
changeset 38031 460c24a6a6ba
parent 37906 e2b23ba9df13
child 38058 ad0485155c0e
     1.1 --- a/test/Tools/isac/OLDTESTS/modspec.sml	Tue Sep 28 08:58:06 2010 +0200
     1.2 +++ b/test/Tools/isac/OLDTESTS/modspec.sml	Tue Sep 28 09:06:56 2010 +0200
     1.3 @@ -31,10 +31,10 @@
     1.4      [([], Pbl), ([1], Frm),([1], Res), ([2], Res), ([3], Pbl), ([3, 1], Frm), 
     1.5       ([3, 1], Res), ([3, 2, 1], Frm), ([3, 2, 1], Res), ([3, 2, 2], Res),
     1.6        ([3, 2], Res)] then () else
     1.7 -raise error "modspec.sml: diff.behav. get_interval after replace} other 2 a";
     1.8 +error "modspec.sml: diff.behav. get_interval after replace} other 2 a";
     1.9  
    1.10  print_depth 99;map fst (get_interval ([3, 2, 1], Res) ([],Res) 9999 pt);
    1.11  print_depth 3;
    1.12  if map fst (get_interval ([3, 2, 1], Res) ([],Res) 9999 pt) = 
    1.13      [([3, 2, 1], Res), ([3, 2, 2], Res), ([3, 2], Res)] then () else
    1.14 -raise error "modspec.sml: diff.behav. get_interval after replace} other 2 b";
    1.15 +error "modspec.sml: diff.behav. get_interval after replace} other 2 b";