Archived
15 lines
505 B
EmacsLisp
15 lines
505 B
EmacsLisp
// lang-got.el - Gothic NLG tests
|
|
// Expected: "sa guma saihwiþ." / "sa guma ist waihs."
|
|
fn test_assert() -> String {
|
|
return sem_realize(sem_frame_lang("assert", "sa guma", "saihwan", "", "got"))
|
|
}
|
|
fn test_question() -> String {
|
|
return sem_realize(sem_frame_lang("query", "sa guma", "saihwan", "", "got"))
|
|
}
|
|
fn test_describe() -> String {
|
|
return sem_realize(sem_frame_lang("describe", "sa guma", "waihs", "", "got"))
|
|
}
|
|
println(test_assert())
|
|
println(test_question())
|
|
println(test_describe())
|