Canonicalize OV commands to VO form.

[open-adventure.git] / main.c

diff --git a/main.c b/main.c
index a57694e3fb110e5e01a1ee73ae90d3cb85de9375..0eab6e8d19bacb4b49d0e89a655fed530f4633e9 100644 (file)
--- a/main.c
+++ b/main.c
@@ -1123,15 +1123,28 @@ Lclearobj:
             }
             if ((command.word[0].id == WATER || command.word[0].id == OIL) && (command.word[1].id == PLANT || command.word[1].id == DOOR)) {
                 if (AT(command.word[1].id)) {
-                    command.word[1].id = POUR;
-                    command.word[1].type = ACTION;
-                    strncpy(command.word[1].raw, "pour", LINESIZE - 1);
+                   memcpy(&command.word[1], &command.word[0],
+                          sizeof(command_word_t));
+                   command.word[0].id = POUR;
+                    command.word[0].type = ACTION;
+                    strncpy(command.word[0].raw, "pour", LINESIZE - 1);
                 }
             }
             if (command.word[0].id == CAGE && command.word[1].id == BIRD && HERE(CAGE) && HERE(BIRD)) {
                 command.word[0].id = CARRY;
                 command.word[0].type = ACTION;
             }
+
+           /* From OV to VO form */
+           if (command.word[0].type==OBJECT && command.word[1].type==ACTION) {
+               command_word_t stage;
+               memcpy(&stage, &command.word[0],
+                          sizeof(command_word_t));
+               memcpy(&command.word[0], &command.word[1],
+                          sizeof(command_word_t));
+               memcpy(&command.word[1], &stage,
+                          sizeof(command_word_t));
+           }
         }
 
 Lookup: