1.1 --- a/src/HOL/Imperative_HOL/ex/Imperative_Quicksort.thy	Tue Jun 30 14:53:58 2009 +0200
     1.2 +++ b/src/HOL/Imperative_HOL/ex/Imperative_Quicksort.thy	Tue Jun 30 14:53:59 2009 +0200
     1.3 @@ -631,9 +631,9 @@
     1.4  
     1.5  ML {* @{code qsort} (Array.fromList [42, 2, 3, 5, 0, 1705, 8, 3, 15]) () *}
     1.6  
     1.7 -export_code qsort in SML_imp module_name QSort
     1.8 +(*export_code qsort in SML_imp module_name QSort*)
     1.9  export_code qsort in OCaml module_name QSort file -
    1.10 -export_code qsort in OCaml_imp module_name QSort file -
    1.11 +(*export_code qsort in OCaml_imp module_name QSort file -*)
    1.12  export_code qsort in Haskell module_name QSort file -
    1.13  
    1.14  end
    1.15 \ No newline at end of file