1*25978Ssam/* 2*25978Ssam * Copyright (c) 1980 Regents of the University of California. 3*25978Ssam * All rights reserved. The Berkeley software License Agreement 4*25978Ssam * specifies the terms and conditions for redistribution. 5*25978Ssam */ 623864Smckusick#ifndef lint 7*25978Ssam_sccsid:.asciz "@(#)dbxxx.s 5.3 (Berkeley) 01/26/86" 823864Smckusick#endif not lint 923864Smckusick 10*25978Ssam#if defined(vax) 11*25978Ssam#define CALL(n, f) callg n,*f 12*25978Ssam#endif 13*25978Ssam#if defined(tahoe) 14*25978Ssam#define CALL(n, f) calls n,*f 15*25978Ssam#endif 16*25978Ssam 1723864Smckusick .data 1823864Smckusick .comm __dbargs,512 1923864Smckusick .text 2023864Smckusick .align 1 21*25978Ssam .globl __dsubc 22*25978Ssam__dsubc: 23*25978Ssam CALL(__dbargs+4,__dbargs) 24*25978Ssam .globl __dsubn 25*25978Ssam__dsubn: 2623864Smckusick halt 2723864Smckusick 2823864Smckusick .data 29*25978Ssam/* __lg_flag is used by f77_abort to decide whether or not to dump memory */ 3023865Smckusick .globl __lg_flag 3123865Smckusick__lg_flag: 3223865Smckusick .long 1 3323865Smckusick .text 34