123864Smckusick# 223864Smckusick# Copyright (c) 1980 Regents of the University of California. 323864Smckusick# All rights reserved. The Berkeley software License Agreement 423864Smckusick# specifies the terms and conditions for redistribution. 523864Smckusick# 623864Smckusick#ifndef lint 7*23865Smckusick_sccsid:.asciz "@(#)dbxxx.s 5.2 (Berkeley) 07/12/85" 823864Smckusick#endif not lint 923864Smckusick 1023864Smckusick .data 1123864Smckusick .comm __dbargs,512 1223864Smckusick .text 1323864Smckusick .align 1 1423864Smckusick .globl __dbsubc 1523864Smckusick__dbsubc: 1623864Smckusick callg __dbargs+4,*__dbargs 1723864Smckusick .globl __dbsubn 1823864Smckusick__dbsubn: 1923864Smckusick halt 2023864Smckusick 2123864Smckusick .data 22*23865Smckusick# __lg_flag is used by f77_abort to decide whether or not to dump memory 23*23865Smckusick .globl __lg_flag 24*23865Smckusick__lg_flag: 25*23865Smckusick .long 1 26*23865Smckusick .text 27