DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T v

⟦4003013db⟧ TextFile

    Length: 784 (0x310)
    Types: TextFile
    Names: »vaxbzero.s«

Derivation

└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z« 
        └─⟦ca79c7339⟧ 
            └─⟦this⟧ »DVIware/laser-setters/mctex/lib/vaxbzero.s«

TextFile

#
# Copyright (c) 1987, 1989 University of Maryland
# Department of Computer Science.  All rights reserved.
# Permission to copy for any purpose is hereby granted
# so long as this copyright notice remains intact.
#

rcsid:	.asciz	"$Header: /usr/src/local/tex/local/mctex/lib/RCS/vaxbzero.s,v 3.1 89/08/22 21:41:14 chris Exp $"

# bzero (addr, count) char *addr; int count;
#
# Zero "count" bytes at address "addr"

	.align	2
	.globl	_bzero
_bzero:
	.word	0
	movl	4(ap),r3		# r3 = addr
	brb	2f
1:
	subl2	r0,8(ap)		# count-=65535 (bytes zeroed this time)
	movc5	$0,(sp),$0,r0,(r3)	# r3 magically points to next 65K
2:
	movzwl	$65535,r0
	cmpl	8(ap),r0		# <= 65535 bytes to zero?
	jgtr	1b			# brif not, zero 65535 and try again
	movc5	$0,(sp),$0,8(ap),(r3)	# zero up to 65535 bytes
	ret