fix: verb declensions in correct order
This commit is contained in:
parent
1b19aea505
commit
3674d11cd2
@ -285,14 +285,13 @@ agrees with."
|
||||
| 2p | | %s | %s | %s | %s |
|
||||
| 3p | | %s | %s | %s | %s |"
|
||||
root root (concat root "ask") (concat root "and") (concat root "it")
|
||||
,@(let (accessor i)
|
||||
(reverse (dolist (declension
|
||||
'(indicative-present subjunctive-present past passive)
|
||||
accessor)
|
||||
(setq i 0)
|
||||
,@(reverse
|
||||
(let (accessor (i 0))
|
||||
(while (< i 6)
|
||||
(push `(nth ,i ,declension) accessor)
|
||||
(setq i (1+ i))))))))
|
||||
(dolist (declension '(indicative-present subjunctive-present past passive))
|
||||
(push `(nth ,i ,declension) accessor))
|
||||
(setq i (1+ i)))
|
||||
accessor))))
|
||||
|
||||
(defun conlanging-eittlandic--make-passive-verb-declension (root strength underlying-vowel passive-consonant passive-vowel)
|
||||
"Create a verb declension for the passive mood.
|
||||
|
Loading…
Reference in New Issue
Block a user