Remove unused assembly functions

source.elna

@@ -220,26 +220,6 @@ begin
   return property
 end;
 
-proc memcmp(lhs: Pointer, rhs: Pointer, n: Word) -> Int;
-var
-  i: Word;
-  lhs_char: ^Char;
-  rhs_char: ^Char;
-  result: Int;
-begin
-  lhs_char := cast(lhs: ^Char);
-  rhs_char := cast(lhs: ^Char);
-  result := 0;
-
-  while i < n & result = 0 do
-    result := lhs_char - rhs_char;
-    lhs_char := lhs_char + 1;
-    rhs_char := rhs_char + 1;
-    i := i + 1u
-  end;
-  return result
-end;
-
 proc skip_node(stream: ^Char, strings: ^Char) -> ^Char;
 var
   token: Word;