src/Sequents/prover.ML
changeset 12311 ce5f9e61c037
parent 12123 739eba13e2cd
child 13105 3d1e7a199bdc
     1.1 --- a/src/Sequents/prover.ML	Wed Nov 28 00:44:37 2001 +0100
     1.2 +++ b/src/Sequents/prover.ML	Wed Nov 28 00:46:26 2001 +0100
     1.3 @@ -174,7 +174,6 @@
     1.4    type T = pack ref;
     1.5    val empty = ref empty_pack
     1.6    fun copy (ref pack) = ref pack;
     1.7 -  val finish = I;
     1.8    val prep_ext = copy;
     1.9    fun merge (ref pack1, ref pack2) = ref (merge_pack (pack1, pack2));
    1.10    fun print _ (ref pack) = print_pack pack;