equal
deleted
inserted
replaced
138 structure ClasetThyData: CLASET_THY_DATA = |
138 structure ClasetThyData: CLASET_THY_DATA = |
139 struct |
139 struct |
140 |
140 |
141 (* data kind claset -- forward declaration *) |
141 (* data kind claset -- forward declaration *) |
142 |
142 |
143 val clasetK = "claset"; |
143 val clasetK = "Provers/claset"; |
144 exception ClasetData of object ref; |
144 exception ClasetData of object ref; |
145 |
145 |
146 local |
146 local |
147 fun undef _ = raise Match; |
147 fun undef _ = raise Match; |
148 |
148 |