39 lines
553 B
AutoHotkey
39 lines
553 B
AutoHotkey
; assert.ahk
|
|
;; assert(a, b, test=2)
|
|
assert(a, b="blank", test=0)
|
|
{
|
|
if (b = "blank")
|
|
{
|
|
if !a
|
|
msgbox % "blank value"
|
|
return 0
|
|
}
|
|
if equal_list(a, b, "`n")
|
|
return 0
|
|
else
|
|
msgbox % test . ":`n" . a . "`nexpected:`n" . b
|
|
}
|
|
|
|
!r::reload
|
|
|
|
;; equal_list(a, b, delimiter)
|
|
equal_list(a, b, delimiter)
|
|
{
|
|
loop, parse, b, %delimiter%
|
|
{
|
|
if instr(a, A_LoopField)
|
|
continue
|
|
else
|
|
return 0
|
|
}
|
|
loop, parse, a, %delimiter%
|
|
{
|
|
if instr(b, A_LoopField)
|
|
continue
|
|
else
|
|
return 0
|
|
}
|
|
|
|
return 1
|
|
}
|