[BACK]Return to fsplit.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / fsplit

Diff for /src/usr.bin/fsplit/Attic/fsplit.c between version 1.7 and 1.8

version 1.7, 2000/06/30 16:00:13 version 1.8, 2001/11/19 19:02:14
Line 111 
Line 111 
 main(argc, argv)  main(argc, argv)
         char  **argv;          char  **argv;
 {  {
         register FILE *ofp;     /* output file */          FILE *ofp;      /* output file */
         register int rv;        /* 1 if got card in output file, 0 otherwise */          int rv; /* 1 if got card in output file, 0 otherwise */
         register char *ptr;          char *ptr;
         int     nflag,          /* 1 if got name of subprog., 0 otherwise */          int     nflag,          /* 1 if got name of subprog., 0 otherwise */
                 retval, i;                  retval, i;
         /* must be as large as max(sizeof(x), sizeof(mainp), sizeof(blockp)) */          /* must be as large as max(sizeof(x), sizeof(mainp), sizeof(blockp)) */
Line 256 
Line 256 
         char   *name;          char   *name;
         int     letters;          int     letters;
 {  {
         register char *ptr;          char *ptr;
   
         while (stat(name, &sbuf) >= 0) {          while (stat(name, &sbuf) >= 0) {
                 for (ptr = name + letters + 2; ptr >= name + letters; ptr--) {                  for (ptr = name + letters + 2; ptr >= name + letters; ptr--) {
Line 273 
Line 273 
 int  int
 getline()  getline()
 {  {
         register char *ptr;          char *ptr;
   
         for (ptr = buf; ptr < &buf[BSZ];) {          for (ptr = buf; ptr < &buf[BSZ];) {
                 *ptr = getc(ifp);                  *ptr = getc(ifp);
Line 292 
Line 292 
 int  int
 lend()  lend()
 {  {
         register char *p;          char *p;
   
         if ((p = skiplab(buf)) == 0)          if ((p = skiplab(buf)) == 0)
                 return (0);                  return (0);
Line 322 
Line 322 
         char   *s;          char   *s;
 {  {
 #define LINESIZE 80  #define LINESIZE 80
         register char *ptr, *p;          char *ptr, *p;
         char    line[LINESIZE], *iptr = line;          char    line[LINESIZE], *iptr = line;
   
         /* first check for comment cards */          /* first check for comment cards */
Line 407 
Line 407 
 functs(p)  functs(p)
         char   *p;          char   *p;
 {  {
         register char *ptr;          char *ptr;
   
 /*      look for typed functions such as: real*8 function,  /*      look for typed functions such as: real*8 function,
                 character*16 function, character*(*) function  */                  character*16 function, character*(*) function  */
Line 435 
Line 435 
 skiplab(p)  skiplab(p)
         char   *p;          char   *p;
 {  {
         register char *ptr;          char *ptr;
   
         for (ptr = p; ptr < &p[6]; ptr++) {          for (ptr = p; ptr < &p[6]; ptr++) {
                 if (*ptr == ' ')                  if (*ptr == ' ')
Line 454 
Line 454 
 look(s, m)  look(s, m)
         char   *s, *m;          char   *s, *m;
 {  {
         register char *sp, *mp;          char *sp, *mp;
   
         sp = s;          sp = s;
         mp = m;          mp = m;
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8