wok diff linld/stuff/src/CRTL.ASM @ rev 20486

perl: force arch
author Pascal Bellard <pascal.bellard@slitaz.org>
date Fri Oct 26 10:09:53 2018 +0200 (2018-10-26)
parents f5088c165f51
children a5b6457fb890
line diff
     1.1 --- a/linld/stuff/src/CRTL.ASM	Tue Oct 23 08:25:49 2018 +0200
     1.2 +++ b/linld/stuff/src/CRTL.ASM	Fri Oct 26 10:09:53 2018 +0200
     1.3 @@ -180,7 +180,7 @@
     1.4                  pop	bx			; s
     1.5                  push	bx
     1.6                  push	ax
     1.7 -        global  puts:near			; puts(bx)
     1.8 +;        global  puts:near			; puts(bx)
     1.9  puts:
    1.10  		call	putsz
    1.11                  mov	bx,offset msg_crlf
    1.12 @@ -188,7 +188,6 @@
    1.13  putcz:
    1.14  		mov	ah,2
    1.15  		int	21h
    1.16 -        global  putsz:near			; putsz(bx)
    1.17  putsz:
    1.18  		mov	dl,[bx]
    1.19  		inc	bx
    1.20 @@ -319,11 +318,11 @@
    1.21                  push	bx
    1.22                  push	ax
    1.23  		;endif
    1.24 -        global  lseekset:near
    1.25 +;        global  lseekset:near
    1.26  lseekset:
    1.27  		clc
    1.28  		db	0B0h			; mov al,im
    1.29 -        global  rewind:near
    1.30 +;        global  rewind:near
    1.31  rewind:						; rewind(bx)
    1.32  		stc
    1.33  		mov	ax,4200h
    1.34 @@ -436,7 +435,7 @@
    1.35          global  die:near			; die(bx)
    1.36  die:
    1.37  		call	puts
    1.38 -        global  _exit:near
    1.39 +;        global  _exit:near
    1.40  _exit:
    1.41  		mov	al,[_no_exit]
    1.42  		cmp	al,0
    1.43 @@ -447,7 +446,7 @@
    1.44  @@hang:
    1.45  		mov	bx, offset msg_hang
    1.46  		call	puts
    1.47 -        global  _abort:near
    1.48 +;        global  _abort:near
    1.49  _abort:
    1.50  		cli
    1.51  @@stop: