From 0ee8ff7914683f492c04e12bbec2af8cc2bb4125 Mon Sep 17 00:00:00 2001 From: andromeda Date: Thu, 12 Mar 2026 23:03:29 +0100 Subject: some major architecture changes --- twasm/asm/tests.asm | 202 ---------------------------------------------------- 1 file changed, 202 deletions(-) (limited to 'twasm/asm/tests.asm') diff --git a/twasm/asm/tests.asm b/twasm/asm/tests.asm index fc9fcc7..6fffb84 100644 --- a/twasm/asm/tests.asm +++ b/twasm/asm/tests.asm @@ -16,12 +16,6 @@ run_tests: call clear_test_arena call test_elemb - call clear_test_arena - call test_identify_token - - call clear_test_arena - call test_identify_next_token - call clear_test_arena call test_get_tte_type @@ -101,202 +95,6 @@ test_elemb: ret .msg db "test_elemb...", 0x00 -; ------------------------------------------------------------------------------ -; test_identify_token -; -; description: -; tests identify_token described functionality -; ------------------------------------------------------------------------------ - -test_identify_token: - mov rsi, .msg - call print.test - - ; length1 token that exists - mov byte [TEST_ARENA_ADDR], "*" - mov rdi, TEST_ARENA_ADDR - mov rsi, 1 - call identify_token - cmp ax, 0x0064 - jne .fail - - ; length1 token that doesn't exist - mov byte [TEST_ARENA_ADDR], " " - mov rdi, TEST_ARENA_ADDR - mov rsi, 1 - call identify_token - cmp ax, 0xFFFF - jne .fail - - ; length2 token that exists - mov word [TEST_ARENA_ADDR], "sp" - mov rdi, TEST_ARENA_ADDR - mov rsi, 2 - call identify_token - cmp ax, 0x0026 - jne .fail - - ; length2 token that doesn't exist - mov word [TEST_ARENA_ADDR], "QQ" - mov rdi, TEST_ARENA_ADDR - mov rsi, 2 - call identify_token - cmp ax, 0xFFFF - jne .fail - - ; length3 token that exists - mov dword [TEST_ARENA_ADDR], "rax" - mov rdi, TEST_ARENA_ADDR - mov rsi, 3 - call identify_token - cmp ax, 0x0000 - jne .fail - - ; length3 token that exists - mov dword [TEST_ARENA_ADDR], "cr0" - mov rdi, TEST_ARENA_ADDR - mov rsi, 3 - call identify_token - cmp ax, 0x004A - jne .fail - - ; length3 token that doesn't exist - mov dword [TEST_ARENA_ADDR], "r16" - mov rdi, TEST_ARENA_ADDR - mov rsi, 3 - call identify_token - cmp ax, 0xFFFF - jne .fail - - ; length4 token that exists - mov dword [TEST_ARENA_ADDR], "r10d" - mov rdi, TEST_ARENA_ADDR - mov rsi, 4 - call identify_token - cmp ax, 0x001A - jne .fail - - ; length4 token that exists - mov dword [TEST_ARENA_ADDR], "r15b" - mov rdi, TEST_ARENA_ADDR - mov rsi, 4 - call identify_token - cmp ax, 0x003F - jne .fail - - ; length4 token that doesn't exist - mov dword [TEST_ARENA_ADDR], "r15q" - mov rdi, TEST_ARENA_ADDR - mov rsi, 4 - call identify_token - cmp ax, 0xFFFF - jne .fail - - .pass: - mov rsi, msg_pass - call print - ret - .fail: - mov rsi, msg_fail - call print - ret - .msg db "test_identify_token...", 0x00 - -; ------------------------------------------------------------------------------ -; test_identify_next_token -; -; description: -; tests identify_next_token described functionality -; ------------------------------------------------------------------------------ - -test_identify_next_token: - mov rsi, .msg - call print.test - - ; length1 token that exists - mov word [TEST_ARENA_ADDR], "* " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x0064 - jne .fail - - ; length1 token that doesn't exist - mov word [TEST_ARENA_ADDR], " " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0xFFFF - jne .fail - - ; length2 token that exists - mov dword [TEST_ARENA_ADDR], "sp " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x0026 - jne .fail - - ; length2 token that doesn't exist - mov dword [TEST_ARENA_ADDR], "QQ " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0xFFFF - jne .fail - - ; length3 token that exists - mov dword [TEST_ARENA_ADDR], "rax " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x0000 - jne .fail - - ; length3 token that exists - mov dword [TEST_ARENA_ADDR], "cr0 " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x004A - jne .fail - - ; length3 token that doesn't exist - mov dword [TEST_ARENA_ADDR], "r16 " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0xFFFF - jne .fail - - ; length4 token that exists - mov dword [TEST_ARENA_ADDR], "r10d" - mov byte [TEST_ARENA_ADDR + 4], " " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x001A - jne .fail - - ; length4 token that exists - mov dword [TEST_ARENA_ADDR], "r15b" - mov byte [TEST_ARENA_ADDR + 4], " " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0x003F - jne .fail - - ; length4 token that doesn't exist - mov dword [TEST_ARENA_ADDR], "r15q" - mov byte [TEST_ARENA_ADDR + 4], " " - mov rdi, TEST_ARENA_ADDR - call identify_next_token - cmp ax, 0xFFFF - jne .fail - - .pass: - mov rsi, msg_pass - call print - ret - .fail: - mov rsi, msg_fail - call print - ret - .msg db "test_identify_next_token...", 0x00 - - ; ------------------------------------------------------------------------------ ; test_get_tte_type ; -- cgit v1.3.1