home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
minnie.tuhs.org
/
2014.11.minnie.tuhs.org.tar
/
minnie.tuhs.org
/
UnixArchive
/
PDP-11
/
Trees
/
V6
/
usr
/
source
/
s5
/
mcount.s
< prev
next >
Wrap
Text File
|
1975-05-14
|
222b
|
21 lines
/ count subroutine calls during profiling
.globl mcount
.comm countbase,2
mcount:
mov (r0),r1
bne 1f
mov countbase,r1
beq 2f
add $6,countbase
mov (sp),(r1)+
mov r1,(r0)
1:
inc 2(r1)
bne 2f
inc (r1)
2:
rts pc