From 73cf0a846192939d72b1dfce2a86e7d1fe81605b Mon Sep 17 00:00:00 2001 From: Christopher Allan Webber Date: Sun, 29 Jan 2017 21:49:39 -0600 Subject: [PATCH 1/1] Add into to predicates --- mudsync/gameobj.scm | 2 +- mudsync/parser.scm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm index 0ce19b6..ee788ea 100644 --- a/mudsync/gameobj.scm +++ b/mudsync/gameobj.scm @@ -92,7 +92,7 @@ (prep-indir-command cmd-take-from '("from" "out of")))) ("put" ((prep-indir-command cmd-put-in - '("in" "inside" "on")))))) + '("in" "inside" "into" "on")))))) ;; Commands we can handle by being something's container ;; dominant version (goes before everything) diff --git a/mudsync/parser.scm b/mudsync/parser.scm index 16a811b..efda86e 100644 --- a/mudsync/parser.scm +++ b/mudsync/parser.scm @@ -61,7 +61,7 @@ ;; definite and indefinite, but not partitive articles (define article '(or "the" "a" "an")) -(define preposition '(or "with" "in" "inside" "on" "out" "out of" +(define preposition '(or "with" "in" "inside" "into" "on" "out" "out of" "at" "as" "to" "about" "from")) (define indirect-irx -- 2.31.1