diff --git a/mats/4.ms b/mats/4.ms index 3177b42044..3d531e227f 100644 --- a/mats/4.ms +++ b/mats/4.ms @@ -1425,9 +1425,9 @@ (procedure? (lambda (x) (fold-left x))) (procedure? (lambda (x) (fold-left x y))) (error? ; nonprocedure - (for-left 3 0 '())) + (fold-left 3 0 '())) (error? ; nonprocedure - (for-left 3 0 '() '())) + (fold-left 3 0 '() '())) (error? ; nonprocedure (fold-left 3 0 '(a b c))) (error? ; improper list @@ -1553,9 +1553,9 @@ (procedure? (lambda (x) (fold-right x))) (procedure? (lambda (x) (fold-right x y))) (error? ; nonprocedure - (for-right 3 0 '())) + (fold-right 3 0 '())) (error? ; nonprocedure - (for-right 3 0 '() '())) + (fold-right 3 0 '() '())) (error? ; nonprocedure (fold-right 3 0 '(a b c))) (error? ; improper list diff --git a/mats/root-experr-compile-0-f-f-f b/mats/root-experr-compile-0-f-f-f index d39d411c69..472415f8e6 100644 --- a/mats/root-experr-compile-0-f-f-f +++ b/mats/root-experr-compile-0-f-f-f @@ -269,6 +269,8 @@ primvars.mo:Expected error in mat trace-output-port: "trace-output-port: #