texinfo/makeinfo makeinfo.c,1.38,1.39

[dirt]

Update of /cvsroot/texinfo/texinfo/makeinfo
In directory sheep:/tmp/cvs-serv4214/makeinfo

Modified Files:
        makeinfo.c 
Log Message:
2004-02-02  Alper Ersoy  <address@hidden>

        * makeinfo.c (next_nonwhitespace_character): new function.



Index: makeinfo.c
===================================================================
RCS file: /cvsroot/texinfo/texinfo/makeinfo/makeinfo.c,v
retrieving revision 1.38
retrieving revision 1.39
diff -C2 -d -r1.38 -r1.39
*** makeinfo.c  2 Feb 2004 11:27:37 -0000       1.38
--- makeinfo.c  2 Feb 2004 13:57:13 -0000       1.39
***************
*** 3223,3226 ****
--- 3223,3243 ----
    return from;
  }
+ 
+ /* Return next non-whitespace and non-cr character.  */
+ int
+ next_nonwhitespace_character ()
+ {
+   /* Start from the next char, because we already hold
+      input_text[input_text_offset] in character variable.  */
+   int pos = input_text_offset + 1;
+ 
+   while (pos < input_text_length)
+     {
+       if (!cr_or_whitespace(input_text[pos]))
+         return input_text[pos];
+       pos++;
+     }
+   return -1;
+ }
  
  /* An external image is a reference, kind of.  The parsing is (not