]> git.eshelyaron.com Git - dict.git/commit
Support DCG and SSU rules in sweeprolog-insert-next-clause
authorEshel Yaron <me@eshelyaron.com>
Sun, 20 Nov 2022 19:31:11 +0000 (21:31 +0200)
committerEshel Yaron <me@eshelyaron.com>
Sun, 20 Nov 2022 19:31:11 +0000 (21:31 +0200)
commit96f8a765d2783fae32368eee47c22f6d852354b0
tree14e89b7072c01569f498fe4331090e7da3266519
parent7dfb85c88f1ba0360b66a4cb83f2812f3bb0d28c
Support DCG and SSU rules in sweeprolog-insert-next-clause

* sweeprolog.el (sweeprolog-definition-at-point): also return kind of
neck.
(sweeprolog-maybe-insert-next-clause): pass it to...
(sweeprolog-insert-next-clause): new argument NECK used instead of
hardcoded ":-", use "Body" for clause body instead of "_".
(sweeprolog-identifier-at-point): handle raw meta goals.
* sweeprolog-tests.el: add tests for sweeprolog-insert-term-dwim
inserting clauses with different neck kinds.
sweeprolog-tests.el
sweeprolog.el