phundrak/conlanging.el
1
0
Fork 0
Code Issues Pull Requests Actions Projects Wiki Activity

fix: verb declensions in correct order
Some checks failed
CI / build (29.4) (push) Failing after 1m8s
Details
CI / build (snapshot) (push) Failing after 54s
Details

Browse Source
This commit is contained in:
Lucien Cartier-Tilet 2024-09-14 14:51:56 +02:00
parent 1b19aea505
commit 3674d11cd2
Signed by: phundrak
GPG Key ID: 347803E8073EACE0
1 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
conlanging-eittlandic.el
View File

@ -285,14 +285,13 @@ agrees with."
| 2p | | %s | %s | %s | %s | | 2p | | %s | %s | %s | %s |
| 3p | | %s | %s | %s | %s |" | 3p | | %s | %s | %s | %s |"
root root (concat root "ask") (concat root "and") (concat root "it") root root (concat root "ask") (concat root "and") (concat root "it")
,@(let (accessor i) ,@(reverse
(reverse (dolist (declension (let (accessor (i 0))
'(indicative-present subjunctive-present past passive) (while (< i 6)
accessor) (dolist (declension '(indicative-present subjunctive-present past passive))
(setq i 0) (push `(nth ,i ,declension) accessor))
(while (< i 6) (setq i (1+ i)))
(push `(nth ,i ,declension) accessor) accessor))))
(setq i (1+ i))))))))
(defun conlanging-eittlandic--make-passive-verb-declension (root strength underlying-vowel passive-consonant passive-vowel) (defun conlanging-eittlandic--make-passive-verb-declension (root strength underlying-vowel passive-consonant passive-vowel)
"Create a verb declension for the passive mood. "Create a verb declension for the passive mood.