src/HOL/Main.ML
author wenzelm
Sat, 07 Jan 2006 12:26:33 +0100
changeset 18608 9cdcc2a5c8b3
parent 9650 6f0b89f2a1f9
permissions -rw-r--r--
support nested cases; added apply_case; replaced make/simple by make_common/nested/simple;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9650
6f0b89f2a1f9 Main now new-style theory; added Main.ML for compatibility;
wenzelm
parents:
diff changeset
     1
6f0b89f2a1f9 Main now new-style theory; added Main.ML for compatibility;
wenzelm
parents:
diff changeset
     2
structure Main =
6f0b89f2a1f9 Main now new-style theory; added Main.ML for compatibility;
wenzelm
parents:
diff changeset
     3
struct
6f0b89f2a1f9 Main now new-style theory; added Main.ML for compatibility;
wenzelm
parents:
diff changeset
     4
  val thy = the_context ();
6f0b89f2a1f9 Main now new-style theory; added Main.ML for compatibility;
wenzelm
parents:
diff changeset
     5
end;