| 
            Last change
 on this file since 778 was             551, checked in by Gregg Young, 19 years ago           | 
        
        
          | 
             
Indentation cleanup 
 
           | 
        
        
          
            
              - 
Property                 svn:eol-style
 set to                 
native
               
              - 
Property                 svn:keywords
 set to                 
Author Date Id Revision
               
             
           | 
        
        
          | 
            File size:
            480 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | #include <os2.h>
 | 
|---|
| 2 | #include <stdlib.h>
 | 
|---|
| 3 | #include <string.h>
 | 
|---|
| 4 | 
 | 
|---|
| 5 | #pragma alloc_text(MISC8,skip_delim,to_delim)
 | 
|---|
| 6 | 
 | 
|---|
| 7 | char *skip_delim(char *a, register char *delim)
 | 
|---|
| 8 | {
 | 
|---|
| 9 | 
 | 
|---|
| 10 |   register char *p = a;
 | 
|---|
| 11 | 
 | 
|---|
| 12 |   if (p && delim) {
 | 
|---|
| 13 |     while (*p) {
 | 
|---|
| 14 |       if (strchr(delim, *p))
 | 
|---|
| 15 |         p++;
 | 
|---|
| 16 |       else
 | 
|---|
| 17 |         break;
 | 
|---|
| 18 |     }
 | 
|---|
| 19 |   }
 | 
|---|
| 20 |   return p;
 | 
|---|
| 21 | }
 | 
|---|
| 22 | 
 | 
|---|
| 23 | char *to_delim(char *a, register char *delim)
 | 
|---|
| 24 | {
 | 
|---|
| 25 | 
 | 
|---|
| 26 |   register char *p = a;
 | 
|---|
| 27 | 
 | 
|---|
| 28 |   if (p && delim) {
 | 
|---|
| 29 |     while (*p) {
 | 
|---|
| 30 |       if (strchr(delim, *p))
 | 
|---|
| 31 |         break;
 | 
|---|
| 32 |       p++;
 | 
|---|
| 33 |     }
 | 
|---|
| 34 |   }
 | 
|---|
| 35 |   return p;
 | 
|---|
| 36 | }
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.