Humza Shahid
401408448f
git-subtree-dir: brolib-sml git-subtree-mainline:64471ecf7fgit-subtree-split:fd96032949
14 lines
289 B
Standard ML
14 lines
289 B
Standard ML
structure RopeAutomerge: TRANSACTION =
|
|
struct
|
|
type t = TinyRope.t
|
|
val empty = TinyRope.empty
|
|
val insert = TinyRope.insert
|
|
val delete = TinyRope.delete
|
|
val toString = TinyRope.toString
|
|
val txns = AutomergePaper.txns
|
|
end
|
|
|
|
structure Main = Run(RopeAutomerge)
|
|
|
|
val _ = Main.run ()
|