Metropoli BBS
VIEWER: apledmf.c MODE: TEXT (ASCII)
/*Copyright (C) 1992, 1996 by Thomas Glen Smith.  All Rights Reserved.*/
/* apledmf APL2 V1.0.0 *************************************************
* Called from apledmd after the statement to be modified has been      *
* formatted and displayed the first time, and editing characters have  *
* been processed.  Apledmf will re-display the line, and update it     *
* with any changes made at the terminal.                               *
***********************************************************************/
#define INCLUDES APLCB+APLED+APLTOKEN+STDIO+STRING
#include "includes.h"
#define MAXLINE 1024
void apledmf(e,line,off,insert)
struct apledst *e;		/* Edit common area.					*/
char line[];			/* Formatted statement.					*/
int off;				/* Offset of first insertion point of blanks.*/
int insert;			/* 1 = insert, 0 = overlay during edit.		*/
{
	Apledcl; Apledrc; Edline; Execmsg;
	extern int aplerr;
	int c,k,n;

	k = edline(line,off,MAXLINE,insert); /* edit line */
	apledcl(e); /* free old tokens */
	apledrc(e,line); /* parse and process edited input */
}
[ RETURN TO DIRECTORY ]