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