Add -script option to Crawl to run a Lua script. Scripts are similar to tests, but can be parameterised.

Add a script to generate 150 level at a named place and report on all the monsters generated there.

1 files changed, 5 insertions, 4 deletions

diff --git a/crawl-ref/source/test/snake-rune.lua b/crawl-ref/source/test/snake-rune.lua
index 56ea8b8273..dbf973afa7 100644
--- a/crawl-ref/source/test/snake-rune.lua
+++ b/crawl-ref/source/test/snake-rune.lua
@@ -1,3 +1,7 @@
+-- Walks down the dungeon to Snake:$ and tests for the existence of the rune.
+-- This is a more exhaustive test than rune-gen.lua since it generates all
+-- intermediate levels and activates the dungeon connectivity code.
+
 local niters = 500
 local current_iter = 0
 
@@ -7,9 +11,6 @@ local branch_entrance_feats = {
 }
 
 local junk_feat_fn = dgn.feature_set_fn("rock_wall", "floor", "stone_wall")
-local down_stair_fn = dgn.feature_set_fn("stone_stairs_down_i",
-                                         "stone_stairs_down_ii",
-                                         "stone_stairs_down_iii")
 
 local function thing_exists_fn(thing)
   return function()
@@ -38,7 +39,7 @@ local function visit_branch_end_from(start, stair_places, final_predicate)
             end
           end
 
-          if down_stair_fn(dfeat) then
+          if test.is_down_stair(dfeat) then
             table.insert(downstairs, dgn.point(x, y))
           end
         end