14 lines
274 B
Standard ML
14 lines
274 B
Standard ML
|
structure LineGapSeph: TRANSACTION =
|
||
|
|
struct
|
||
|
|
type t = LineGap.t
|
||
|
|
val empty = LineGap.empty
|
||
|
|
val insert = LineGap.insert
|
||
|
|
val delete = LineGap.delete
|
||
|
|
val toString = LineGap.toString
|
||
|
|
val txns = SephBlog.txns
|
||
|
|
end
|
||
|
|
|
||
|
|
structure Main = Run(LineGapSeph)
|
||
|
|
|
||
|
|
val _ = Main.run ()
|