HEX
Server: Apache
System: Linux pdx1-shared-a1-38 6.6.104-grsec-jammy+ #3 SMP Tue Sep 16 00:28:11 UTC 2025 x86_64
User: mmickelson (3396398)
PHP: 8.1.31
Disabled: NONE
Upload Files
File: //usr/share/jed/lib/idl.slc
.#�! 3# IDL�" $1��! 4 " $1� 3 create_syntax_table��! 6! ;  " 37 " $1� - define_syntax��! 7# ([{# )]}" 40 " $1� - define_syntax��! 8" 34" 34 " $1� - define_syntax��! 9" 39" 34 " $1� - define_syntax��" 11+ $0-9a-zA-Z_# 119 " $1� - define_syntax
��" 12/ -+0-9a-fA-F.xXL" 48 " $1� - define_syntax��" 13$ ,.?:" 44 " $1� - define_syntax��" 14- %-+/&*=<>|!~^" 43 " $1� - define_syntax��" 15" 64" 35 " $1� - define_syntax��" 17 " $1! 1� 0 set_syntax_flags��" 21 " $1! $! 1� / define_keywordsP��"
 22 " $14 doeqgegtifleltneofor! 2� / define_keywordsP��" 23 " $15 andendformodnotproxor! 3� / define_keywordsP��" 24 " $10 caseelsegotothen! 4� / define_keywordsP��" 25 " $14 beginendifuntilwhile! 5� / define_keywordsP��" 26 " $1D commonendforend
rependwhirepeatreturn! 6� / define_keywordsP��" 27 " $1. endcaseendelse! 7� / define_keywordsP��" 28 " $18 endwhilefunctionon_error! 8� / define_keywordsP��" 29 " $1) endrepeat! 9� / define_keywordsP��" 30 " $1* on_ioerror" 10� / define_keywordsP
��" 32 " $1> abscoseofexpfixhdrmaxminsintan! 3! 1� 1 define_keywords_nP��" 33 " $1D alogplotsavesizesortsqrtstopuniqwset! 4! 1� 1 define_keywords_nP��" 34 " $1p closefloatflooropenropenwplotsprintranksreadfreadsreadurebinspawntotalwherewshow! 5! 
1� 1 define_keywords_nP��" 35 " $1� alog10dblarrdoublefinitefltarrindgenintarrlonarrprintfstrarrstringstrlenstrmidstrposstrputwriteuwindow! 6! 1� 1 define_keywords_nP��" 36 " $1m defsysvdindgenexecutefindgenget_lunintegerrandomnrandomustr_sepstretchst
rtrim! 7! 1� 1 define_keywords_nP��" 37 " $18 findfilefree_lunn_params! 8! 1� 1 define_keywords_nP��" 38 " $1M histogramimaginaryreplicatestrupcasetranspose! 9! 1� 1 define_keywords_nP��" 39 " $1> n_elementsstrlowcasestrmessage" 10! 1� 1 define
_keywords_nP��" 40 " $16 keyword_setstrcompress" 11! 1� 1 define_keywords_nP,�" 46 # bol.��" 47" 59� * ffind_char/.�" 49 * go_right_1�" 50 . parse_to_point" -2A.�" 52 ) go_left_1w/c/f�" 56 # eol�" 44y6 idl_find_effective_eol,*�" 61 ! n+! 0�! n�" 
62 . bol_skip_white��" 64$ pro � * looking_at�) function � * looking_atD.�" 66! 0w/c.�" 69 $ up_1/.�" 71 6 idl_find_effective_eol + bskip_white��" 72! $� + blooking_at.�" 81 ) go_down_1v/b�" 84�! n/f�" 86 . bol_skip_white�" 87 ! nw�" 59y: idl_beginni
ng_of_statement,*�" 90 # col+�" 92 ) push_spot�" 93 . bol_skip_white�" 94 # col + what_columnB.�" 96�# col�" 97 ( bol_trim��" 98 # col� * whitespace/c�# 100 ( pop_spot�" 90y- idl_indent_to,*�# 103 $ word % begin+��# 105 $ word� * looking_at.! 0w/b.�# 1
08 ( pop_spot/o�# 111 ) push_spot���# 112 $ word� & strlen� ( go_right��# 113- [^a-z0-9A-Z_]� - re_looking_at.�# 114! 0w/b��# 116 % begin� % ffind.! 1w/c.�# 119 6 idl_find_effective_eol�# 120 + bskip_white��# 121! $� + blooking_at.v/b/.��# 123! 1� $ 
down/k�# 124 # bol��# 125 % begin� % ffindw�# 103y4 idl_looking_at_block,�# 130 ) push_spot�# 131 . bol_skip_white*�# 132 # ret+��# 133" if&  begin� 4 idl_looking_at_block.��# 134% while&  begin� 4 idl_looking_at_block/.��# 135% else &  begin� 4 i
dl_looking_at_block/.��# 136# for&  begin� 4 idl_looking_at_block/.��# 137$ case#  of� 4 idl_looking_at_block/.��# 138* endif else&  begin� 4 idl_looking_at_block/.��# 139& repeat&  begin� 4 idl_looking_at_block/.��# 140) function � * looking_at/
.��# 141$ pro � * looking_at/7.�# 142! 1�# ret/.�# 145 6 idl_find_effective_eol��# 146# $ 	� + bskip_chars��# 147% BEGIN� + blooking_at.�! :� % bfind/6�# ret/d�# 149 ( pop_spot�# 150 # retw�# 128y7 idl_is_block_beginnning��# 1531 Idl_Indent_Amount!
 2� / custom_variable,*�# 156 # len+! 0�# len* , extra_indent+! 0�, extra_indent*�# 157 $ word+�# 159 ) push_spot.�# 162 ( pop_spot��# 163 # len , extra_indent9� - idl_indent_to�# 164 ) push_mark�# 165 + bskip_white��# 166 $ bolpN * skip_white� ( pop_m
ark/o�# 169 : idl_beginning_of_statement.�# 171 ) push_mark�# 172 ( pop_spot�# 173 ) push_spot�# 174 # bol�# 175! 1�" 41� 7 find_matching_delimiterA.�# 177 + what_column�# len�# 178 * pop_mark_0�# 179�# lenw/c�# 182 * pop_mark_1��# 183$ pro � * looking
_at�) function � * looking_atD.��# 185" 32� * ffind_charP�# 186 * skip_white/c��# 188) A-Za-z$_!� * skip_chars�# 189 + what_column 1 Idl_Indent_Amount9�# lenw/c��# 193" 64� / looking_at_char.w/c��# 195# end� * looking_at. 1 Idl_Indent_AmountQ�, extra
_indent/.��# 196$ else� * looking_at.��# 198! 4� ( go_right * skip_white��# 199" 58� / looking_at_charN.�# 201 1 Idl_Indent_AmountQ�, extra_indent/c/c/d�# 205 $ up_1.�# 207! 0�# lenw/b.�# 213 . bol_skip_white�# 214 $ eolp�" 59� / looking_at_charD�" 
64� / looking_at_charD.v/b/.�# 217 $ up_1/k�# 218 : idl_beginning_of_statementP�# 219 + what_column�# len�# 221 7 idl_is_block_beginnning.�# 223 1 Idl_Indent_Amount�# len/c�# 154y/ idl_indent_line,�# 229 7 idl_is_block_beginnning. / idl_indent_line/c�# 
230 + bskip_white��# 231! ,� + blooking_at.�"  $� & insert/c�# 232 ' newline�# 233 / idl_indent_line�# 227y6 idl_newline_and_indent�# 236# IDL�" $1��# 237 " $1� ( keymap_p.��# 239 " $1� + make_keymap��# 2402 newline_and_indent$" \r " $1� ) definekey��
# 241+ indent_line! 	 " $1� ) definekey/b,*�# 246 # idl+# IDL�# idl��# 247 # idl! 0� ( set_mode��# 248 # idl� 0 use_syntax_table��# 249 # idl� * use_keymap��# 250+ indent_hook/ idl_indent_line� / set_buffer_hook��# 2513 newline_indent_hook6 idl_n
ewline_and_indent� / set_buffer_hook��# 252- idl_mode_hook� . run_mode_hooks�# 244y( idl_mode