diff --git a/kernel/trunk/core/syscall.inc b/kernel/trunk/core/syscall.inc
index 7bdb8e99ce..83f6354018 100644
--- a/kernel/trunk/core/syscall.inc
+++ b/kernel/trunk/core/syscall.inc
@@ -179,7 +179,6 @@ iglobal
       dd undefined_syscall       ; 78-free
       dd undefined_syscall       ; 79-free
       dd fileSystemUnicode       ; 80-File system interface for different encodings
-      dd sys_array               ; 81-Array
 
         times 255 - ( ($-servetable2) /4 )  dd undefined_syscall
       dd sys_end                 ; -1-end application
diff --git a/kernel/trunk/kernel32.inc b/kernel/trunk/kernel32.inc
index 7608137ff6..3dc4488605 100644
--- a/kernel/trunk/kernel32.inc
+++ b/kernel/trunk/kernel32.inc
@@ -70,8 +70,6 @@ include "network/stack.inc"
 include "crc.inc"               ; checksums
 include "unicode.inc"
 
-include "other/array.inc"       ; array
-
 ; include "imports.inc"
 ; include "core/ext_lib.inc"
 ; include "core/conf_lib.inc"
diff --git a/kernel/trunk/other/array.inc b/kernel/trunk/other/array.inc
deleted file mode 100755
index eebdf05ae3..0000000000
--- a/kernel/trunk/other/array.inc
+++ /dev/null
@@ -1,65 +0,0 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;                                                              ;;
-;; Copyright (C) KolibriOS team 2004-2020. All rights reserved. ;;
-;; Distributed under terms of the GNU General Public License    ;;
-;;                                                              ;;
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-$Revision: 7825 $
-
-
-align 4
-proc sys_array
-        cmp     ebx, 0
-        je      sys_init_array
-        ret
-endp
-
-align 4
-proc sys_init_array
-        push    ecx
-        push    edx
-        call    sys_index_array
-        ret
-endp
-
-align 4
-sys_index_array:
-        enter   8, 0
-        mov     eax, [ebp+8]
-        and     eax, 3
-        mov     [ebp-4], eax
-        mov     eax, [ebp-4]
-        shl     eax, 2
-        add     eax, [ebp+0Ch]
-        mov     [ebp-8], eax
-
-        mov     eax, [ebp-4]
-        cmp     [ebp+8], eax
-        jne     .A4F4h
-        push    10h
-        pop     eax
-        add     eax, [ebp-8]
-        jmp     .A516h
-
-.A4F4h:
-        mov     esi, [ebp-8]
-        cmp     dword [esi], 0
-        jne     .A508h
-        mov     eax, 68
-        mov     ebx, 12
-        mov     ecx, 32
-        call    malloc
-        mov     esi, [ebp-8]
-        mov     [esi], eax
-
-.A508h:
-        push    dword[esi]
-        mov     eax, [ebp+8]
-        shr     eax, 2
-        push    eax
-        call    sys_index_array
-
-.A516h:
-        leave
-        ret     8