ocaml - 链表 OCaml

Question

我将如何创建一个链接列表来在 OCaml 中保存我的数据？我正在尝试制作一个单链表，但是我遇到了语法问题。我只想制作一个模块来简单地从链表中获取'a，插入'a或删除'a。
有人知道吗？

Answer 1

正如轶事所说，ocaml 已经有列表。

但是，为了您的兴趣，这就是您可以构建自己的列表的方式。显然，您永远不会在实际应用程序中使用它 :) 如果您想要一些树，数据结构将非常相似。

exception Empty_list

type 'a my_list = Nil | List of 'a * 'a my_list

let head = function 
     Nil -> raise Empty_list
   | List(e,_) -> e;;

let tail = function
    Nil -> Nil
   | List(_,t) -> t

let l = List(1, List(4, List(8, Nil)));;

print_endline (string_of_int(head l));;

print_endline (string_of_int (head(tail l)));;