1# 2# Copyright (c) 1980 Regents of the University of California. 3# All rights reserved. The Berkeley software License Agreement 4# specifies the terms and conditions for redistribution. 5# 6#ifndef lint 7_sccsid:.asciz "@(#)dbxxx.s 5.2 (Berkeley) 07/12/85" 8#endif not lint 9 10 .data 11 .comm __dbargs,512 12 .text 13 .align 1 14 .globl __dbsubc 15__dbsubc: 16 callg __dbargs+4,*__dbargs 17 .globl __dbsubn 18__dbsubn: 19 halt 20 21 .data 22# __lg_flag is used by f77_abort to decide whether or not to dump memory 23 .globl __lg_flag 24__lg_flag: 25 .long 1 26 .text 27