src/Pure/ML/exn_properties_dummy.ML
author wenzelm
Sat, 20 Dec 2014 22:23:37 +0100
changeset 59164 ff40c53d1af9
parent 50911 ee7fe4230642
child 60865 4194901fd513
permissions -rw-r--r--
proper context for "net" tactics; avoid implicit Tactic.build_net -- make its operational behavior explicit in application;

(*  Title:      Pure/ML/exn_properties_dummy.ML
    Author:     Makarius

Exception properties -- dummy version.
*)

signature EXN_PROPERTIES =
sig
  val get: exn -> Properties.T
  val update: Properties.entry list -> exn -> exn
end;

structure Exn_Properties: EXN_PROPERTIES =
struct

fun get _ = [];
fun update _ exn = exn;

end;