1D List（Array）の内容が数値の連続値かどうかチェックするAppleScriptです。
地味ですが、超一級に重要な部品です。このルーチンが存在することで、1D List同士の要素の存在確認を手軽に行えています。
いろいろ便利に使っていたのですが、引数のリストが要素数＝０のヌルリスト（{}）を渡した場合にエラーになることがわかったので、そのエラー対処を追加しています。
| AppleScript名：1Dリストの内容が連続値かどうかチェック v2 |
| set aList to {2, 3, 4} set aRes to chkSequential(aList) of me –> true set aList to {} set aRes to chkSequential(aList) of me –> false –与えられた1D Listが連続値かどうかをチェックする on chkSequential(aList as list) if length of aList = 1 then return true if aList = {} then return false set aFirst to first item of aList set aList to rest of aList repeat with i in aList set j to contents of i if j is not equal to (aFirst + 1) then return false end if copy j to aFirst end repeat return true end chkSequential |
(Visited 85 times, 1 visits today)