Rev 2287 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 2287 | Rev 2664 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | ; flat assembler core |
1 | ; flat assembler core |
| 2 | ; Copyright (c) 1999-2011, Tomasz Grysztar. |
2 | ; Copyright (c) 1999-2012, Tomasz Grysztar. |
| 3 | ; All rights reserved. |
3 | ; All rights reserved. |
| Line 4... | Line 4... | ||
| 4 | 4 | ||
| 5 | assembler: |
5 | assembler: |
| 6 | xor eax,eax |
6 | xor eax,eax |
| Line 1912... | Line 1912... | ||
| 1912 | je invoked_error |
1912 | je invoked_error |
| 1913 | or al,al |
1913 | or al,al |
| 1914 | jz invoked_error |
1914 | jz invoked_error |
| 1915 | jmp extra_characters_on_line |
1915 | jmp extra_characters_on_line |
| 1916 | 1916 | assert_directive: |
|
| - | 1917 | call calculate_logical_expression |
|
| - | 1918 | or al,al |
|
| - | 1919 | jnz instruction_assembled |
|
| - | 1920 | cmp [error_line],0 |
|
| - | 1921 | jne instruction_assembled |
|
| - | 1922 | mov eax,[current_line] |
|
| - | 1923 | mov [error_line],eax |
|
| - | 1924 | mov [error],assertion_failed |
|
| - | 1925 | jmp instruction_assembled |
|
| - | 1926 | ||