|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1156 (0x484)
Types: TextFile
Notes: UNIX file
Names: »prof.h«
└─⟦7decd0fac⟧ Bits:30004155/disk4.imd SW95713I 386/ix Software Development System Rel. 2.0
└─⟦7decd0fac⟧ UNIX Filesystem
└─⟦this⟧ »sd/new/usr/include/prof.h«
/* Copyright (c) 1984 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */
#ident "@(#)prof.h 2.4 - 88/07/14"
#ifndef MARK
#define MARK(L) {}
#else
#undef MARK
#ifdef i386
#define MARK(L) {\
asm(" .data");\
asm(" .align 4");\
asm(".L.:");\
asm(" .long 0");\
asm(" .text");\
asm("M.L:");\
asm(" movl $.L.,%edx");\
asm(" call _mcount");\
}
#endif
#ifdef vax
#define MARK(L) {\
asm(" .data");\
asm(" .align 4");\
asm(".L.:");\
asm(" .long 0");\
asm(" .text");\
asm("M.L:");\
asm(" nop;nop");\
asm(" movab .L.,r0");\
asm(" jsb mcount");\
}
#endif
#if u3b || M32 || u3b15 || u3b5 || u3b2
#define MARK(L) {\
asm(" .data");\
asm(" .align 4");\
asm(".L.:");\
asm(" .word 0");\
asm(" .text");\
asm("M.L:");\
asm(" movw &.L.,%r0");\
asm(" jsb _mcount");\
}
#endif
#ifdef pdp11
#define MARK(L) {\
asm(" .bss");\
asm(".L.:");\
asm(" .=.+2");\
asm(" .text");\
asm("M.L:");\
asm(" mov $.L.,r0");\
asm(" jsr pc,mcount");\
}
#endif
#endif