| Last change
 on this file since 443 was             2, checked in by root, 23 years ago | 
        
          | 
Initial revision
 | 
        
          | 
              
Property                 svn:eol-style
 set to                 native
Property                 svn:keywords
 set to                 Author Date Id Revision | 
        
          | File size:
            497 bytes | 
      
      
| Rev | Line |  | 
|---|
| [2] | 1 | #include <os2.h> | 
|---|
|  | 2 | #include <stdlib.h> | 
|---|
|  | 3 | #include <string.h> | 
|---|
|  | 4 |  | 
|---|
|  | 5 | #pragma alloc_text(MISC8,skip_delim,to_delim) | 
|---|
|  | 6 |  | 
|---|
|  | 7 |  | 
|---|
|  | 8 | char * skip_delim (char *a,register char *delim) { | 
|---|
|  | 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 |  | 
|---|
|  | 24 | char * to_delim (char *a,register char *delim) { | 
|---|
|  | 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.