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/xlct.pro

    r19 r114  
    66PRO XLCT_PSAVE                  ;Save/Restore our plotting state. 
    77;  Swaps our state with the current state each time its called. 
     8; 
     9  compile_opt idl2, strictarrsubs 
     10; 
    811 
    912COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    … …  
    2528 
    2629pro xlct_alert_caller 
     30; 
     31  compile_opt idl2, strictarrsubs 
     32; 
    2733COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    2834        top, bot, silent, chop, lock, g_lbl, vbot, vtop, g_slider, $ 
    … …  
    5157; Redraw the ramp image. 
    5258PRO xlct_show 
     59; 
     60  compile_opt idl2, strictarrsubs 
     61; 
    5362COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    5463        top, bot, silent, chop, lock, g_lbl, vbot, vtop, g_slider, $ 
    … …  
    6877 
    6978PRO xlct_draw_cps, i, c 
     79; 
     80  compile_opt idl2, strictarrsubs 
     81; 
    7082COMMON colors, r_orig, g_orig, b_orig, r_curr, g_curr, b_curr 
    7183COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    … …  
    8698 
    8799PRO xlct_transfer, UPDATE=update 
     100; 
     101  compile_opt idl2, strictarrsubs 
     102; 
    88103COMMON colors, r_orig, g_orig, b_orig, r_curr, g_curr, b_curr 
    89104COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    … …  
    115130 
    116131PRO xlct_event, event 
     132; 
     133  compile_opt idl2, strictarrsubs 
     134; 
    117135COMMON colors, r_orig, g_orig, b_orig, r_curr, g_curr, b_curr 
    118136COMMON xlct_com, r0, g0, b0, tfun, state, filename, cps, psave, pnt, $ 
    … …  
    430448          MODAL=modal, BLOCK=block, UPDATECALLBACK=updt_cb_name, $ 
    431449          UPDATECBDATA=updt_cb_data 
     450; 
     451  compile_opt idl2, strictarrsubs 
     452; 
    432453 
    433454   COMMON colors, r_orig, g_orig, b_orig, r_curr, g_curr, b_curr 
Note: See TracChangeset for help on using the changeset viewer.