Рыцев Максим P3218

colon.inc

 %endif
 
 %macro colon 2
-    %ifstr %2
-    %else
-        %error "Error: Value must be a string"
-    %endif
-
-    %%current_element: ; Создаем локальную метку для текущего элемента
+    %ifstr %1
+    %ifid %2
+    %%2: ; Создаем локальную метку для текущего элемента
         dq last ; Сохраняем указатель на предыдущий элемент
         db %1, 0x0 ; Сохраняем ключ
-    %define last %%current_element ; Обновляем last
+    %define last %%2 ; Обновляем last
+    %else
+    %error "The key value must be a string"
+    %endif
+    %else
+    %error "The second value must be a valid identifier"
+    %endif
 %endmacro
\ No newline at end of file

dict.inc

-extern find_word
+%ifndef EXTERN_DICT_DEFINED
+
+    %define EXTERN_DICT_DEFINED
+
+    extern find_word
+
+%endif
\ No newline at end of file

lib.asm

 
   .iteration:
     call read_char
-    cmp rax, 0 ; Проверяем всю ли строку считали
+    test rax, rax ; Проверяем всю ли строку считали
     je .return
     cmp rax, SPACE ; Проверяем всю ли строку считали
     je .return
     xor rax, rax ; Устанавливаем rax на 0
     ret
 
-; Принимает указатель на строку, пытается
-; прочитать из её начала беззнаковое число.
-; Возвращает в rax: число, rdx : его длину в символах
-; rdx = 0 если число прочитать не удалось
-
-; ПЕРЕПИСАТЬ!!
 parse_uint:
     push r12 ; Сохраняем calle-saved регистр r12
     xor r12, r12 ; Очищаем его и будем использовать как счетчик длины строки

lib.inc

-  extern exit 
-  extern string_length 
-  extern print_string 
-  extern print_error
-  extern print_char 
-  extern print_newline 
-  extern print_uint 
-  extern print_int 
-  extern string_equals 
-  extern read_char 
-  extern read_word 
-  extern parse_uint 
-  extern parse_int 
-  extern string_copy
\ No newline at end of file
+%ifndef EXTERN_LIB_DEFINED
+
+    %define EXTERN_LIB_DEFINED
+
+    extern exit
+    extern string_length
+    extern print_string
+    extern print_error
+    extern print_char
+    extern print_newline
+    extern print_uint
+    extern print_int
+    extern string_equals
+    extern read_char
+    extern read_word
+    extern parse_uint
+    extern parse_int
+    extern string_copy
+
+%endif
\ No newline at end of file