1 /*- 2 * Copyright (c) 1992, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Rodney Ruddock of the University of Guelph. 7 * 8 * %sccs.include.redist.c% 9 */ 10 11 #ifndef lint 12 static char sccsid[] = "@(#)a.c 8.1 (Berkeley) 05/31/93"; 13 #endif /* not lint */ 14 15 #include <sys/types.h> 16 17 #ifdef DBI 18 #include <db.h> 19 #endif 20 #include <regex.h> 21 #include <setjmp.h> 22 #include <stdio.h> 23 24 #include "ed.h" 25 #include "extern.h" 26 27 /* 28 * This sets things up for the central input routine to place the text 29 * at the proper location for an append. 30 */ 31 void 32 a(inputt, errnum) 33 FILE *inputt; 34 int *errnum; 35 { 36 if (rol(inputt, errnum)) 37 return; 38 39 if (g_flag == 0) 40 u_clr_stk(); 41 add_flag = 1; 42 input_lines(inputt, errnum); 43 add_flag = 0; 44 } 45