--- a/src/HOL/Library/code_test.ML Sun Sep 20 19:36:45 2020 +0200
+++ b/src/HOL/Library/code_test.ML Sun Sep 20 20:00:14 2020 +0200
@@ -395,8 +395,8 @@
"end;"
val ml_source =
"Control.MC.matchRedundantError := false; Control.MC.matchRedundantWarn := false;" ^
- "use " ^ ML_Syntax.print_string (Bash.string (File.platform_path code_path)) ^
- "; use " ^ ML_Syntax.print_string (Bash.string (File.platform_path driver_path)) ^
+ "use " ^ ML_Syntax.print_string (File.platform_path code_path) ^
+ "; use " ^ ML_Syntax.print_string (File.platform_path driver_path) ^
"; Test.main ();"
in
check_settings compiler ISABELLE_SMLNJ "SMLNJ executable";