view 3rdparty/packages/ed/doglob.c @ 1427:b3868abe1fee

Rearrangement of directories and files for making bootable 6809/6309 MV disks
author boisy
date Tue, 02 Dec 2003 22:35:55 +0000
parents bef1844de0dc
children
line wrap: on
line source

/*      doglob.c        */
#include <stdio.h>
#include "tools.h"
#include "ed.h"

int doglob()
{
  int lin, stat;
  char *cmd;
  LINE *ptr;

  cmd = inptr;

  while (1) {
        ptr = getptr(1);
        for (lin = 1; lin <= lastln; lin++) {
                if (ptr->l_stat & LGLOB) break;
                ptr = ptr->l_next;
        }
        if (lin > lastln) break;

        ptr->l_stat &= ~LGLOB;
        curln = lin;
        inptr = cmd;
        if ((stat = getlst()) < 0) return(stat);
        if ((stat = docmd(1)) < 0) return (stat);
  }
  return(curln);
}