home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d0xx / d084 / ed.lha / Ed / getlst.c < prev    next >
Encoding:
C/C++ Source or Header  |  1987-06-29  |  743 b   |  46 lines
  1. /*
  2.  * Copyright 1987 Brian Beattie Rights Reserved.
  3.  *
  4.  * Permission to copy and/or distribute granted under the
  5.  * following conditions:
  6.  *
  7.  * 1). No charge may be made other than resonable charges
  8.  *    for reproduction.
  9.  *
  10.  * 2). This notice must remain intact.
  11.  *
  12.  * 3). No further restrictions may be added.
  13.  *
  14.  */
  15. #include <stdio.h>
  16. #include "tools.h"
  17. #include "ed.h"
  18.  
  19. getlst()
  20. {
  21.     int    num;
  22.  
  23.     line2 = 0;
  24.     for(nlines = 0; (num = getone()) >= 0;)
  25.     {
  26.         line1 = line2;
  27.         line2 = num;
  28.         nlines++;
  29.         if(*inptr != ',' && *inptr != ';')
  30.             break;
  31.         if(*inptr == ';')
  32.             curln = num;
  33.         inptr++;
  34.     }
  35.     nlines = min(nlines, 2);
  36.     if(nlines == 0)
  37.         line2 = curln;
  38.     if(nlines <= 1)
  39.         line1 = line2;
  40.  
  41.     if(num == ERR)
  42.         return(num);
  43.     else
  44.         return(nlines);
  45. }
  46.