Archived
Will Anderson
15 lines
511 B
EmacsLisp
15 lines
511 B
EmacsLisp
// lang-enm.el - Middle English NLG tests
|
|
// Expected: "The man seeth the hound." / "The man is good."
|
|
fn test_assert() -> String {
|
|
return sem_realize(sem_frame_lang("assert", "the man", "seen", "", "enm"))
|
|
}
|
|
fn test_question() -> String {
|
|
return sem_realize(sem_frame_lang("query", "the man", "seen", "", "enm"))
|
|
}
|
|
fn test_describe() -> String {
|
|
return sem_realize(sem_frame_lang("describe", "the man", "good", "", "enm"))
|
|
}
|
|
println(test_assert())
|
|
println(test_question())
|
|
println(test_describe())
|