Ignore:
Timestamp:
06/19/06 16:14:56 (18 years ago)
Author:
smasson
Message:

new compilation options (compile_opt idl2, strictarrsubs) in each routine

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/COULEURS/xpal.pro

    r19 r114  
    157157; color maps and set !P appropriately. Returns 1 if the colors changed, 
    158158; 0 otherwise. 
     159; 
     160  compile_opt idl2, strictarrsubs 
     161; 
    159162  common xp_com, xpw, state 
    160163 
     
    176179 
    177180pro XP_ALERT_CALLER 
     181; 
     182  compile_opt idl2, strictarrsubs 
     183; 
    178184 
    179185  common xp_com, xpw, state 
     
    200206  ; For visuals with static colormaps, update the graphics 
    201207  ; after a change by XLOADCT. 
     208; 
     209  compile_opt idl2, strictarrsubs 
     210; 
    202211  if ((COLORMAP_APPLICABLE(redrawRequired) GT 0) and $ 
    203212        (redrawRequired GT 0)) then begin 
     
    208217 
    209218pro XP_REDRAW 
     219; 
     220  compile_opt idl2, strictarrsubs 
     221; 
    210222 
    211223  common xp_com, xpw, state 
     
    227239;       - 'G': Draw the data part of the Green plot 
    228240;       - 'B': Draw the data part of the Blue plot 
     241; 
     242  compile_opt idl2, strictarrsubs 
     243; 
    229244 
    230245  common xp_com, xpw, state 
     
    303318;       - 'G': ... 
    304319;       - 'B': ... 
     320; 
     321  compile_opt idl2, strictarrsubs 
     322; 
    305323  common xp_com, xpw, state 
    306324  common colors, r_orig, g_orig, b_orig, r_curr, g_curr, b_curr 
     
    348366 
    349367pro XP_BUTTON_EVENT, event 
     368; 
     369  compile_opt idl2, strictarrsubs 
     370; 
    350371 
    351372   common xp_com, xpw, state 
     
    461482 
    462483PRO xp_button_event_event, ev 
     484; 
     485  compile_opt idl2, strictarrsubs 
     486; 
    463487COMMON basecommon,  bas212, bas222,  bas232 
    464488  WIDGET_CONTROL, ev.id,  GET_UVALUE = uval 
     
    485509 
    486510pro XP_EVENT, event 
     511; 
     512  compile_opt idl2, strictarrsubs 
     513; 
    487514 
    488515   common xp_com, xpw, state 
     
    532559pro XPAL, group=group, BLOCK=block, UPDATECALLBACK=updt_cb_name, $ 
    533560        UPDATECBDATA=updt_cb_data 
     561; 
     562  compile_opt idl2, strictarrsubs 
     563; 
    534564 
    535565 
Note: See TracChangeset for help on using the changeset viewer.