adbrucker
/
isabelle-hacks
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Code improvement: use actual proof context.
adbrucker/isabelle-hacks/master This commit looks good Details

This commit is contained in:
Achim D. Brucker 2019-01-21 23:03:45 +00:00
parent 446792928e
commit dd8a141d5d
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Nano_JSON.thy
View File

@ -702,7 +702,6 @@ structure Nano_Json_Serialize_Isar = struct
let
val thy = Proof_Context.theory_of ctxt
val master_dir = Resources.master_directory thy
val ctxt = Proof_Context.init_global thy;
val term = Thm.concl_of (Global_Theory.get_thm thy (json_const^"_def"))
val json_term = case term of
_ $ (_ $ json_term) => json_term