Archived
Will Anderson
15 lines
582 B
EmacsLisp
15 lines
582 B
EmacsLisp
// lang-grc.el - Ancient Greek NLG tests
|
|
// Expected: "ὁ ἄνθρωπος ὁράει τὸν κύνα." / "ὁ ἄνθρωπος ἐστί καλός."
|
|
fn test_assert() -> String {
|
|
return sem_realize(sem_frame_lang("assert", "ho anthropos", "horao", "", "grc"))
|
|
}
|
|
fn test_question() -> String {
|
|
return sem_realize(sem_frame_lang("query", "ho anthropos", "horao", "", "grc"))
|
|
}
|
|
fn test_describe() -> String {
|
|
return sem_realize(sem_frame_lang("describe", "ho anthropos", "kalos", "", "grc"))
|
|
}
|
|
println(test_assert())
|
|
println(test_question())
|
|
println(test_describe())
|