Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Tools/Compute_Oracle/am_interpreter.ML
changeset 31971 8c1b845ed105
parent 30161 c26e515f1c29
child 32740 9dd0a2f83429 
--- a/src/Tools/Compute_Oracle/am_interpreter.ML	Thu Jul 09 17:34:59 2009 +0200
+++ b/src/Tools/Compute_Oracle/am_interpreter.ML	Thu Jul 09 22:01:41 2009 +0200
@@ -16,7 +16,7 @@
                  | CApp of closure * closure | CAbs of closure
                  | Closure of (closure list) * closure
 
-structure prog_struct = TableFun(type key = int*int val ord = prod_ord int_ord int_ord);
+structure prog_struct = Table(type key = int*int val ord = prod_ord int_ord int_ord);
 
 datatype program = Program of ((pattern * closure * (closure*closure) list) list) prog_struct.table
isabelle