# HG changeset patch
# User Pascal Bellard <pascal.bellard@slitaz.org>
# Date 1534277885 -7200
# Node ID f4bc280fe3c4190da05298ba2068f9898d343a01
# Parent  c0625ff5d49b85a0be8ec61c16b898e98bf0bc42
linld: remove dead code

diff -r c0625ff5d49b -r f4bc280fe3c4 linld/receipt
--- a/linld/receipt	Mon Aug 13 00:46:30 2018 +0200
+++ b/linld/receipt	Tue Aug 14 22:18:05 2018 +0200
@@ -19,7 +19,7 @@
 {
 	mv DIST $src 2> /dev/null
 	cd $src
-	rm LINLD$SUFFIX/CRTL.CPP
+	rm LINLD$SUFFIX/CRTL.CPP LINLD$SUFFIX/INT15_88.ASM
 	cp $stuff/src/* LINLD$SUFFIX/
 	cp -a LINLD$SUFFIX TAZBOOT
 	sed -i 's/-3/-DNO386/' TAZBOOT/BCCOPT.OPT
diff -r c0625ff5d49b -r f4bc280fe3c4 linld/stuff/src/CRTL.ASM
--- a/linld/stuff/src/CRTL.ASM	Mon Aug 13 00:46:30 2018 +0200
+++ b/linld/stuff/src/CRTL.ASM	Tue Aug 14 22:18:05 2018 +0200
@@ -399,32 +399,6 @@
 
 
 ;***************************************************************
-;int strlen(const char* s);
-;***************************************************************
-        global  _strlen:near
-        proc    _strlen near
-
-		pop	ax			;caller return address
-                pop	bx			; s
-                push	bx
-                push	ax
-        global  strlen:near			; strlen(bx)
-strlen:
-                mov	cx,bx
-                dec	bx
-@@lenlp:
-		inc	cx
-                inc	bx
-                cmp	[byte bx],0
-                loopne	@@lenlp			; until eos or s == NULL
-                sub	bx,cx
-                xchg	ax,bx
-                ret
-
-        endp    _strlen
-
-
-;***************************************************************
 ;int strhead(const char* a,const char* b);
 ;***************************************************************
         global  _strhead:near
diff -r c0625ff5d49b -r f4bc280fe3c4 linld/stuff/src/CRTLX.H
--- a/linld/stuff/src/CRTLX.H	Mon Aug 13 00:46:30 2018 +0200
+++ b/linld/stuff/src/CRTLX.H	Tue Aug 14 22:18:05 2018 +0200
@@ -4,7 +4,6 @@
 extern "C" char* strcpy(const char* a,const char* b);
 extern "C" char* strcat(const char* a,const char* b);
 extern "C" int strcmp(const char* a,const char* b);
-extern "C" int strlen(const char* s);
 extern "C" char* strstr(const char* a,const char* b);
 extern "C" char *progname(void);
 extern "C" void chdirname(char *path);
diff -r c0625ff5d49b -r f4bc280fe3c4 linld/stuff/src/JUMP.ASM
--- a/linld/stuff/src/JUMP.ASM	Mon Aug 13 00:46:30 2018 +0200
+++ b/linld/stuff/src/JUMP.ASM	Tue Aug 14 22:18:05 2018 +0200
@@ -67,7 +67,7 @@
 ; Oops! We can stomp on our toes... better stop now
 		mov	bx,offset overflow
 		extrn	die:near
-		jmp	near die
+		call	near die
 @@nooverflow:
 		cli				; we start doing destructive things to DOS
 		push	es
diff -r c0625ff5d49b -r f4bc280fe3c4 linld/stuff/src/_BEG.ASM
--- a/linld/stuff/src/_BEG.ASM	Mon Aug 13 00:46:30 2018 +0200
+++ b/linld/stuff/src/_BEG.ASM	Tue Aug 14 22:18:05 2018 +0200
@@ -146,7 +146,7 @@
               ;;int     67h
                 extrn   die:near
 godie:
-		jmp	near die
+		call	near die
 check_rm_paging:
 ; It's a 386 in real mode, chk for paging (crazy but possible)
                 p386