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