/*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 */
}