mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-05 22:38:44 +00:00
Fixed README
This commit is contained in:
parent
8917ae20e7
commit
d575f2ca15
3 changed files with 3 additions and 3 deletions
|
|
@ -6,7 +6,7 @@ Prerequisites: ocaml [http://ocaml.org], opam [http://opam.ocaml.org].
|
|||
|
||||
Building:
|
||||
|
||||
* `opam pin add GT https://github.com/dboulytchev/GT.git`
|
||||
* `opam pin add GT https://github.com/kakasu/GT.git#ppx`
|
||||
* `opam pin add ostap https://github.com/dboulytchev/ostap.git`
|
||||
* `opam install ostap`
|
||||
* `opam install GT`
|
||||
|
|
|
|||
|
|
@ -1,6 +1,6 @@
|
|||
fun insert (tree, value) {
|
||||
case tree of
|
||||
`Empty -> return `Node (value, `Empty, `Empty)
|
||||
`Empty -> return `Node (value, `Empty, `Empty)
|
||||
| `Node (x, left, right) ->
|
||||
if x > value
|
||||
then return `Node (x, insert (left, value), right)
|
||||
|
|
|
|||
|
|
@ -1,7 +1,7 @@
|
|||
fun collect_ints_acc (v, tail) local i {
|
||||
case v of
|
||||
a@#unboxed -> return `cons (a, tail)
|
||||
| #string -> return tail
|
||||
| #string -> return tail
|
||||
| _ ->
|
||||
for i := 0, i < v.length, i := i + 1 do
|
||||
tail := collect_ints_acc (v[i], tail)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue