Ignore:
Timestamp:
03/16/07 10:22:26 (17 years ago)
Author:
pinsard
Message:

corrections of some misspellings in some *.pro

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/STRING/strtok.pro

    r186 r226  
    44; @file_comments 
    55; Retrieve portion of string up to token. 
    6 ;  
     6; 
    77; @categories 
    88; String 
     
    1010; @param STRING {in}{required} 
    1111; String to be split. Contains text after in, out token on output. 
    12 ;  
     12; 
    1313; @param TOKEN {in}{required} 
    14 ; Token to use in splitting old.        
     14; Token to use in splitting old. 
    1515; 
    16 ; @keyword TRIM  
     16; @keyword TRIM 
    1717; set to remove leading blanks from old before returning. 
    1818; 
    1919; @keyword HELP 
    2020; print useful message and exit. 
    21 ;  
     21; 
    2222; @returns 
    2323; new   -- portion of string up to token.              out 
     
    2828; Token may be one or more characters. 
    2929; if token is not found, returns old and sets old to ''. 
    30 ;  
     30; 
    3131; @examples 
    3232;       If old is 'foo44 bar', then strtok( old, '44' ) would return 
     
    5858;  Copyright (C) 1996 The Regents of the University of California, All 
    5959;  Rights Reserved.  Written by Matthew W. Craig. 
    60 ;  See the file COPYRIGHT for restrictions on distrubting this code. 
     60;  See the file COPYRIGHT for restrictions on distributing this code. 
    6161;  This code comes with absolutely NO warranty; see DISCLAIMER for details. 
    6262; 
     
    7474    On_error, 2 
    7575 
    76     IF (n_params() NE 2) OR keyword_set(Help) THEN BEGIN  
     76    IF (n_params() NE 2) OR keyword_set(Help) THEN BEGIN 
    7777        offset = '   ' 
    7878        print, offset+'Retrieve portion of string up to token.' 
     
    102102        print, offset+offset+"  new='xyz' and old=''." 
    103103        return, -1 
    104     ENDIF  
     104    ENDIF 
    105105 
    106106    pos = strpos(string, token) 
    107107 
    108108    IF (pos GE 0) THEN BEGIN 
    109         front = strmid(string, 0, pos)  
     109        front = strmid(string, 0, pos) 
    110110        string = strmid(string, pos + strlen(token), strlen(string)) 
    111111        IF keyword_set(trim) THEN string = strtrim(string, 1) 
    112112        return, front 
    113113    ENDIF 
    114      
     114 
    115115    front = string 
    116116    string = '' 
    117117    return, front 
    118      
     118 
    119119END 
    120120 
Note: See TracChangeset for help on using the changeset viewer.