Lines Matching refs:HASH
40 # POSSIBLE ARGS: NUMERIC, STRING, ARRAY, HASH, REGEX, CODE
71 # HASH
80 when {0} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH
81 when {1} { ok (1) } else { ok (0) } # ; -> SUB, NOT HASH
111 # HASH
120 when {0} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH
121 when {1} { ok (1) } else { ok (0) } # ; -> SUB, NOT HASH
151 # HASH
161 when {0} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH
162 when {1} { ok (1) } else { ok (0) } # ; -> SUB, NOT HASH
167 # 4. HASH SWITCH
196 # HASH
205 when {0} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH
206 when {1} { ok (1) } else { ok (0) } # ; -> SUB, NOT HASH
218 return $type eq 'HASH' && $data->{a}
251 # HASH
259 when {0} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH
260 when {1} { ok (0) } else { ok (1) } # ; -> SUB, NOT HASH