모듈:어레이/테스트 케이스

Module
현지의 수출. = {}  현지의 어레이 = 요구하다 "모듈: 배열"  현지의 기능. 모으다(반복하다)  현지의  = 어레이()  위해서   반복하다 하다   :삽입하다()  끝.  돌아가다  끝.  현지의 합계_개요, 성공. = 0, 0 현지의 기능. 주장하다()  합계_개요 = 합계_개요 + 1  한다면  그리고나서   성공. = 성공. + 1  끝. 끝.  기능. 수출..실행_실행()  현지의 네 알겠습니다, 리트 = pcall(기능. ()   주장하다(어레이(1, 2, 3):지도(기능. (x) 돌아가다 x * x 끝.):콘센트 ", " == "1, 4, 9")      주장하다(어레이(1, 2, 3, 4, 5):필터(기능. (x) 돌아가다 x % 2 == 0 끝.):콘센트 ", " == "2, 4")      주장하다(어레이():유형() == '어레이')      주장하다(어레이(1, 제로, 2, 제로, 3):압축하다.():콘센트 ", " == "1, 2, 3")   주장하다(모으다(어레이(1, 제로, 2, 제로, 3):스파스아이페어()):콘센트 ", " == "1, 3, 5")      주장하다(어레이("a", "b", "c"):설정()["a"] == 진실의)   주장하다(어레이("a", "b", "c"):설정하다()["a"] == 진실의)      주장하다(어레이(2, 4, 8):모든.(기능. (x) 돌아가다 x % 2 == 0 끝.) == 진실의)   주장하다(어레이(1, 2, 3):몇개(기능. (x) 돌아가다 x % 2 == 0 끝.) == 진실의)      주장하다(어레이(1, 2, 3, 제로, 4):길이() == 3)      주장하다(어레이(1, 2, 3, 제로, 4):포함하다(3) == 진실의)   주장하다(어레이(1, 2, 3, 제로, 4):포함하다(4) == 거짓의)      주장하다(어레이.Keys To List(키 투 리스트)(어레이("a", "b", "c"):뒤집다()):콘센트 ", " == "a, b, c")      주장하다(어레이(1, 제로, 2, 제로, 3):maxIndex(최대인덱스() == 5)   주장하다(어레이(1, 제로, 2, 제로, 3):max_index() == 5)      주장하다(어레이(1, 제로, 2, 제로, 3):num_keys():콘센트 ", " == "1, 3, 5")      주장하다(모으다(어레이("a", "b", "c"):리버스아이페어()):콘센트 ", " == "3, 2, 1")      주장하다(어레이("a", "b", "c"):거꾸로 하다():콘센트 ", " == "c, b, a")      주장하다(어레이("a", "b", "c"):serial_displays_displays { 태그 없음 = 진실의 } == "a, b, c")      주장하다(어레이(1, 1, 2, 3, 1, 2, 3):중복 제거():콘센트 ", " == "1, 2, 3")      주장하다(어레이(1, 2, 3, 4, 5):조각을 내라(1, 3):콘센트 ", " == "1, 2, 3")   주장하다(어레이(1, 2, 3, 4, 5):조각을 내라(1, -3):콘센트 ", " == "1, 2, 3")      주장하다(어레이(1, 2, 3):adjust_index(색인 조정)(-1) == 3)      주장하다((어레이(1, 2, 3) + 어레이(4, 5, 6)):콘센트 ", " == "1, 2, 3, 4, 5, 6")  끝.)    현지의 에러  한다면 것은 아니다. 네 알겠습니다 그리고나서   에러 = 리트  끝.    현지의 색. = 성공. < > 합계_개요 그리고. "빨간색" 또는 "녹색"    돌아가다 ('<span style="color: %s;">%d개의 어설션 중 %d개가 통과됨 </span>%s')   :포맷(색., 성공., 합계_개요, 에러 그리고. '\n\n<span class="error">' .. 에러 .. '</span>' 또는 "") 끝.  돌아가다 수출.