diff options
Diffstat (limited to 'agent.prolog')
| -rw-r--r-- | agent.prolog | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/agent.prolog b/agent.prolog index a575b2f..d936d3f 100644 --- a/agent.prolog +++ b/agent.prolog @@ -192,10 +192,10 @@ checkBats :- batsAt(Location), write('A giant bat swoops down, picks you up, and deposits you elsewhere in the cave.\n\n'), roomList(Rooms), - filter(Rooms, somethingAt, emptyRooms), - random_member(NewLocation, emptyRooms), + random_member(NewLocation, Rooms), retract(here(Location)), - asserta(here(NewLocation)). + asserta(here(NewLocation)), + checkHazards. checkBats :- true. |