Commit 2e7b84a1 authored by Jesse McGrew's avatar Jesse McGrew
Browse files

parser.zil: Removed some unused local variables.

parent e9a3561c0250
......@@ -2750,7 +2750,7 @@ Args:
Returns:
A random element from the table."
<ROUTINE PICK-ONE (TABL "AUX" (LENGTH <GET .TABL 0>) (CNT <GET .TABL 1>) OCNT RND S MSG)
<ROUTINE PICK-ONE (TABL "AUX" (LENGTH <GET .TABL 0>) (CNT <GET .TABL 1>) OCNT RND MSG)
;"Choose a random table element between CNT and LENGTH"
<SET RND <RANDOM-IN-RANGE .CNT .LENGTH>>
<SET MSG <GET .TABL .RND>>
......@@ -2783,7 +2783,7 @@ Args:
Returns:
A random element from the table."
<ROUTINE PICK-ONE-R (TABL "AUX" MSG RND)
<ROUTINE PICK-ONE-R (TABL "AUX" RND)
<SET RND <RANDOM-IN-RANGE 1 <GET .TABL 0>>>
<GET .TABL .RND>>
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment