command-priority
direct-command
- indir-command
- indir-as-direct-command
+ prep-indir-command
+ prep-direct-command
loose-direct-command
- loose-indir-command
+ loose-prep-command
empty-command
direct-greedy-command
greedy-command
%default-priority))
-(define* (indir-command verbs action #:optional prepositions)
+(define* (prep-indir-command verbs action #:optional prepositions)
(make-command verbs
cmatch-indir-obj
(lambda* (goes-by #:key direct-obj indir-obj preposition)
action
%high-priority))
-(define* (indir-as-direct-command verbs action #:optional prepositions)
+(define* (prep-direct-command verbs action #:optional prepositions)
(make-command verbs
cmatch-indir-obj
(lambda* (goes-by #:key direct-obj indir-obj preposition)
action
%high-priority))
-(define* (loose-indir-command verbs action #:optional prepositions)
+(define* (loose-prep-command verbs action #:optional prepositions)
(make-command verbs
cmatch-indir-obj
(const #t)