Archived
15 lines
498 B
EmacsLisp
15 lines
498 B
EmacsLisp
// lang-pi.el - Pali NLG tests
|
|
// Expected: "puriso passati." / "puriso sundaro hoti."
|
|
fn test_assert() -> String {
|
|
return sem_realize(sem_frame_lang("assert", "puriso", "passati", "", "pi"))
|
|
}
|
|
fn test_question() -> String {
|
|
return sem_realize(sem_frame_lang("query", "puriso", "passati", "", "pi"))
|
|
}
|
|
fn test_describe() -> String {
|
|
return sem_realize(sem_frame_lang("describe", "puriso", "sundaro", "", "pi"))
|
|
}
|
|
println(test_assert())
|
|
println(test_question())
|
|
println(test_describe())
|