--- a/src/HOL/Imperative_HOL/ex/Imperative_Quicksort.thy Thu Jul 08 16:48:33 2010 +0200
+++ b/src/HOL/Imperative_HOL/ex/Imperative_Quicksort.thy Thu Jul 08 17:23:05 2010 +0200
@@ -637,7 +637,7 @@
ML {* @{code qsort} (Array.fromList [42, 2, 3, 5, 0, 1705, 8, 3, 15]) () *}
-export_code qsort in SML_imp module_name QSort
+export_code qsort in SML_imp module_name QSort file -
export_code qsort in OCaml module_name QSort file -
export_code qsort in OCaml_imp module_name QSort file -
export_code qsort in Haskell module_name QSort file -
--- a/src/HOL/Imperative_HOL/ex/Linked_Lists.thy Thu Jul 08 16:48:33 2010 +0200
+++ b/src/HOL/Imperative_HOL/ex/Linked_Lists.thy Thu Jul 08 17:23:05 2010 +0200
@@ -999,4 +999,9 @@
ML {* @{code test_2} () *}
ML {* @{code test_3} () *}
+export_code test_1 test_2 test_3 in SML_imp module_name QSort file -
+export_code test_1 test_2 test_3 in OCaml module_name QSort file -
+export_code test_1 test_2 test_3 in OCaml_imp module_name QSort file -
+export_code test_1 test_2 test_3 in Haskell module_name QSort file -
+
end