X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/blobdiff_plain/2b84abb596f52ab2068d52108adc96838ad4340a..31cef89cb428866f787983e68246030321893df4:/usr/src/cmd/px/20con.s?ds=inline

diff --git a/usr/src/cmd/px/20con.s b/usr/src/cmd/px/20con.s
index 08eea6a76a..8ca853d466 100644
--- a/usr/src/cmd/px/20con.s
+++ b/usr/src/cmd/px/20con.s
@@ -1,15 +1,24 @@
 #
-# 20con.s
+# Copyright (c) 1979 Regents of the University of California
+#
+# char sccsid[] = "@(#)20con.s 4.1 10/10/80";
 #
 # CONOPS
 #
 _CON1:
 	cvtbw	(r10)+,-(sp)
 	jmp	(r8)
+_CON14:
+	cvtbl	(r10)+,-(sp)
+	jmp	(r8)
 _CON2:
 	incl	r10
 	movw	(r10)+,-(sp)
 	jmp	(r8)
+_CON24:
+	incl	r10
+	cvtwl	(r10)+,-(sp)
+	jmp	(r8)
 _CON4:
 	incl	r10
 	pushl	(r10)+
@@ -21,7 +30,7 @@ _CON8:
 _CON:
 	cvtbl	(r10)+,r0
 	bneq	l2001
-	cvtwl	(r10)+,r0	#r0 has length to be moved
+	movzwl	(r10)+,r0	#r0 has length to be moved
 l2001:
 	movl	r10,r1		#r1 has addr of data to be moved
 	movl	r0,r2		#r2 has length of stack space
@@ -32,3 +41,11 @@ l2002:
 	addl2	r2,r10		#advance over data
 	movc5	r0,(r1),$0,r2,(sp)   #move string to stack
 	jmp	(r8)
+_LVCON:
+	cvtbl	(r10)+,r0	#r0 has literal string length
+	bneq	l2003
+	movzwl	(r10)+,r0
+l2003:
+	pushl	r10		#address of literal
+	addl2	r0,r10		#jump over literal
+	jmp	(r8)