我在“moduleTable:TABLE =”模块中遇到语法错误,当我尝试在oCaml中运行此代码时,单词usingTable突出显示为红色。我想在下面的执行示例中创建格式表。这有什么问题?我正在使用的环境是https://try.ocamlpro.com/fun-demo/tryocaml_index.html#path%3Dtries,因为我无法理解如何在Windows中使用cygwin或oCaml Bash。
module type TABLE =
sig
type table
val emptyTable : table
val printTable : table -> string
val create_table : string * string list * (string list) list -> table
end;;
module usingTable : TABLE =
struct
let emptyTable = ()
let table = (string * (string * string list) list)
let rec printTable aTable = match aTable with
()->""
| (title, [data]) -> "\n"^title^"\n\n"^printTable(data)
| [(col,cont)::t] -> col^" "^printTable([t])
end;;
let atable = usingTable.emptyTable;;
let atable = ("Student", [("Id", ["2";"4";"7";"9"]);
("Name", ["Jim";"Linnea";"Steve";"Hannah"]);
("Gender",["Male";"Female";"Male";"Female"]);
("Course",["Geography";"Economics";"Informatics";"Geography"])
]);;
print_string (usingTable.printTable atable) ;;
答案 0 :(得分:0)
正如我的评论中所建议的那样,在重新关注此代码示例(不仅包含语法错误,还包含类型错误)之前,您可能需要先查看一些其他参考。
例如,我建议以下链接: