Changes by: Aleksey Nogin (nogin at cs.caltech.edu)
Date: 2004-08-25 22:54:44 -0700 (Wed, 25 Aug 2004)
Revision: 6141
Log message:

      The MMC part of the df_context commit I just made. With this change, I
      get the correct behavior for contexts in LetFun* sequents:
      
      # << LetFunDecl{| <H>; f: 'ty >- LetFunDef{| <J> ; FunDef{'f; 'def[]} >- 'f |} |} >>;;
      (* Recursive functions: <?\239?\191?\189?\239?\191?\189>, f : !ty *) let rec <?\239?\191?\189?\239?\191?\189> and f = def in f : term
      

Changes  Path
+0 -2 mpcompiler-branches/letfun/mmc/core/mmc_core_ast.ml
+2 -0 mpcompiler-branches/letfun/mmc/core/mmc_core_tast.ml
+2 -23 mpcompiler-branches/letfun/util/mm_dform_util.ml
+0 -1 mpcompiler-branches/letfun/util/mm_dform_util.mli