ELF> @@`%@8@@@@@@@@@@  ` ` 0 ( ( `( `@@DDPtd@@ddQtd/lib64/ld-linux-x86-64.so.2GNU GNUːp7UO~oDК)}wkUq  :~[?4P__gmon_start___Jv_RegisterClasseslibpthread.so.0writeread__errno_locationopencloselseeklibc.so.6execvabortprintfstrlenputenvmemcpymallocgetenvreadlinkgetcwdaccessstrcmpstrerror__libc_start_mainfreeGLIBC_2.2.5$ ui aui !`!`!`!`"`"`"`"` "` ("` 0"` 8"` @"`H"`P"`X"``"`h"`p"`x"`"`"`H2MH5 % @% h% h%z h%r h%j h%b h%Z h%R hp%J h`%B h P%: h @%2 h 0%* h %" h % h% h%  h% h% h% h% h1I^HHPTI@H@H` @HH HtHÐUHSH= uK `H  H `HHH9s$fDHH  `H H9r H[fff.H= UHtHt `ÐGW  W ÐS@u H[HH@gfffH))Ã0҈uH[SHHD[H\$Hl$؉Ld$Ll$LcLt$L|$H8IHIsAA|-Hc3LHLHB|#/t B#/LcJ<#DIcLHcj+HHl$H\$Ld$Ll$ Lt$(L|$0H8H\$Hl$HHHHHHl$H\$Hfff.H\$Hl$Ld$Ll$ILt$L|$H8ILAACl5Mc}HcHc7LHLHJ<3IcL+HHl$H\$Ld$Ll$ Lt$(L|$0H8DSHHH¿[DUHSHHtBHt0HcЀ|/t1FHT H/tuHH[]ÐHHH[]ffffff.AWAVAUATUSHHF HHt$ x[/Hu/Hu @AZ@lHIt4LDpMcLLILHMZ@LDL:tuDtlI t IAE<:uE1t AEAteHHILQEt8I}:uI몿HHH/HHD$(fHHI+x'HHLAHfDHD$(8$ufL% I|$oI|$ D$haI|$D$lSI|$D$DEI|$A8I|$D$@*1҉D$11HAD$<t.H$@H@DD$<L= AAAIHD$H8t$I$_VH HT$ Ht$ HHHD$0HT$PLv*AHD$D$H|$0A"`II}HLuAEƒmAD9/HcL$H|$LD$ I ItL1HT$D9bLD$ IcH|$MLD$PM0^fDl$HcD$DD$AMcAHIDD$I<@H= HAHK,HcD$D|$l$0Ml$M,I܉"IE?@LIEIH= LH=w \LcL?ul$L$uH[]A\A]A^A_ÿ[@H|$HY@́$ELF$$1DHcH$Ht$p@DH@HD^D$AA@Z@H@HDHH|$HH@HH)HD$ H8'!@HT$PH:Y@|$hHc\$<|$lI|$DIDID3Dl$HcD$t$AMcHIt$L6HIA<$/L11cH߻u(@k/H$AH$1DI|H$LD H;$uE1f$A uJf.D$p@LIHtl@HLt]$AA9$1DLD$AHcH$Ht$p@DeH@LD$tsL$l+L$hDH$D$AʼnL$lL$D+L$hD$hL$D|$p@I @N @^ @n @~ @ @ @@o@@@@@@@@@@@@@@@@@@@@@GCC: (GNU) 4.5.1 20100924 (Red Hat 4.5.1-4).symtab.strtab.shstrtab.interp.note.ABI-tag.note.gnu.build-id.gnu.hash.dynsym.dynstr.gnu.version.gnu.version_r.rela.dyn.rela.plt.init.text.fini.rodata.eh_frame_hdr.eh_frame.ctors.dtors.jcr.dynamic.got.got.plt.data.bss.comment.rackcmdl@#@ 1<@<$Do`@`N @@V@^o@0ko@@z @ 8@8 0@0H@H` @ @@@d0@0 `  `  ` ( `( !`!!`!"`"  $` $0 $,L$ -3 59 @ ` `- `: @P $`_($`m p @y `@ ` @ @ @Y @ 0 @ @4 @ @"`@!`0 `A `T( `@@<@`@@@@@ @ 8@ 0@ H@ @@@@0@ ` ` `( `!`!`"` $`] "`h| @ @  @: @qE"`V@ew"`@ ` @)=[ $`g{0$`"` $`"` ` @  0@call_gmon_start__CTOR_LIST____DTOR_LIST____JCR_LIST____do_global_dtors_auxcompleted.5947dtor_idx.5949frame_dummy__CTOR_END____FRAME_END____JCR_END____do_global_ctors_auxas_intnum_to_stringnext_stringdo_path_appendpath_appendstring_appendwrite_str.clone.0X_flags_GLOBAL_OFFSET_TABLE___init_array_end__init_array_start_DYNAMICdata_startprintf@@GLIBC_2.2.5execv@@GLIBC_2.2.5__libc_csu_fini_startclose@@GLIBC_2.2.5abort@@GLIBC_2.2.5__gmon_start___Jv_RegisterClasses_finiread@@GLIBC_2.2.5malloc@@GLIBC_2.2.5__libc_start_main@@GLIBC_2.2.5absolutizebinary_type_hack_IO_stdin_usedfree@@GLIBC_2.2.5strlen@@GLIBC_2.2.5__data_startstrerror@@GLIBC_2.2.5__dso_handlelseek@@GLIBC_2.2.5readlink@@GLIBC_2.2.5__DTOR_END____libc_csu_initmemcpy@@GLIBC_2.2.5putenv@@GLIBC_2.2.5getenv@@GLIBC_2.2.5__errno_location@@GLIBC_2.2.5__bss_startstrcmp@@GLIBC_2.2.5getcwd@@GLIBC_2.2.5_endaccess@@GLIBC_2.2.5_coldir_edatawrite@@GLIBC_2.2.5configopen@@GLIBC_2.2.5main_init#~5.3.4.10T,%r$_@only^AquoteD#%kernelBmodule(module #%resolver (quote #%kernel) (let-values (((orig) (current-module-name-resolver)) ((regs) (make-hasheq)) ((mapping-table) (quote ())) ((library-table) (quote ()))) (hash-set! regs (namespace-module-registry (current-namespace)) (vector mapping-table library-table)) (letrec-values (((lookup) (lambda (name rel-to stx load? orig) (if (not (module-path? name)) (orig name rel-to stx load?) (let-values (((table-vec) (hash-ref regs (namespace-module-registry (current-namespace)) #f)) ((name) (if (pair? name) (if (eq? (quote submod) (car name)) (if (null? (cddr name)) (if (equal? ".." (cadr name)) name (if (equal? "." (cadr name)) name (cadr name))) name) name) name))) (if (not table-vec) (orig name rel-to stx load?) (let-values (((mapping-table) (vector-ref table-vec 0)) ((library-table) (vector-ref table-vec 1))) (let-values (((a) (if rel-to (assq (resolved-module-path-name rel-to) mapping-table) #f)) ((ss->rkt) (lambda (s) (regexp-replace #rx"[.]ss$" s ".rkt")))) (if a (let-values (((a2) (assoc name (cadr a)))) (if a2 (make-resolved-module-path (cdr a2)) (orig name rel-to stx load?))) (let-values (((lname) (let-values (((name) (let-values (((name) (if (pair? name) (if (eq? (quote submod) (car name)) (cadr name) name) name))) (if (symbol? name) (list (quote lib) (symbol->string name)) name)))) (if (pair? name) (if (eq? (quote lib) (car name)) (if (null? (cddr name)) (if (regexp-match #rx"^[^/]*[.]" (cadr name)) (string-append "mzlib/" (ss->rkt (cadr name))) (if (regexp-match #rx"^[^/.]*$" (cadr name)) (string-append (cadr name) "/main.rkt") (if (regexp-match #rx"^[^.]*$" (cadr name)) (string-append (cadr name) ".rkt") (ss->rkt (cadr name))))) (string-append (apply string-append (map (lambda (s) (string-append s "/")) (cddr name))) (ss->rkt (cadr name)))) (if (eq? (quote planet) (car name)) (letrec-values (((split) (lambda (s rx suffix-after) (let-values (((m) (regexp-match-positions rx s))) (if m (cons (substring s 0 (caar m)) (split (substring s (cdar m)) rx (- suffix-after 1))) (list (if (<= suffix-after 0) (if (regexp-match? #rx"[.]" s) s (string-append s ".rkt")) s)))))) ((last-of) (lambda (l) (if (null? (cdr l)) (car l) (last-of (cdr l))))) ((not-last) (lambda (l) (if (null? (cdr l)) null (cons (car l) (not-last (cdr l))))))) (if (null? (cddr name)) (let-values (((s) (if (symbol? (cadr name)) (symbol->string (cadr name)) (cadr name)))) (let-values (((parts) (split s #rx"/" 2))) (let-values (((vparts) (split (cadr parts) #rx":" +inf.0))) (cons (quote planet) (cons (if (null? (cddr parts)) "main.rkt" (ss->rkt (last-of parts))) (cons (cons (car parts) (cons (string-append (car vparts) ".plt") (if (null? (cddr parts)) null (cdddr parts)))) (if (null? (cddr parts)) null (not-last (cddr parts))))))))) (let-values (((s) (cadr name))) (let-values (((parts) (split s #rx"/" +inf.0))) (if (= 1 (length parts)) (list* (quote planet) (ss->rkt (cadr name)) (cddr name)) (list* (quote planet) (ss->rkt (last-of parts)) (caddr name) (append (cdddr name) (not-last parts)))))))) #f)) #f))) ((planet-match?) (lambda (a b) (if (equal? (cons (car a) (cddr a)) (cons (car b) (cddr b))) (let-values (((a) (cadr a)) ((b) (cadr b))) (if (equal? (car a) (car b)) (if (equal? (cadr a) (cadr b)) #t #f) #f)) #f))) ((restore-submod) (lambda (lname) (if (pair? name) (if (eq? (car name) (quote submod)) (list* (quote submod) lname (cddr name)) lname) lname)))) (let-values (((a3) (if lname (if (string? lname) (assoc (restore-submod lname) library-table) (ormap (lambda (e) (let-values (((e) (if (pair? name) (if (eq? (car name) (quote submod)) (if (pair? (car e)) (if (eq? (caar e) (quote submod)) (if (equal? (cddar e) (cddr name)) (cons (cadar e) (cdr e)) #f) #f) #f) e) e))) (if e (if (string? (car e)) #f (if (planet-match? (cdar e) (cdr lname)) e #f)) #f))) library-table)) #f))) (if a3 (make-resolved-module-path (cdr a3)) (orig name rel-to stx load?)))))))))))) ((embedded-resolver) (case-lambda ((name from-namespace) (if from-namespace (let-values (((name) (if name (resolved-module-path-name name) #f))) (let-values (((src-vec) (hash-ref regs (namespace-module-registry from-namespace) #f))) (let-values (((a) (if src-vec (assq name (vector-ref src-vec 0)) #f))) (if a (let-values (((vec) (hash-ref regs (namespace-module-registry (current-namespace)) (lambda () (let-values (((vec) (vector null null))) (hash-set! regs (namespace-module-registry (current-namespace)) vec) vec))))) (vector-set! vec 0 (cons a (vector-ref vec 0))) (vector-set! vec 1 (append (letrec-values (((loop) (lambda (l) (if (null? l) null (if (eq? (cdar l) name) (cons (car l) (loop (cdr l))) (loop (cdr l))))))) (loop library-table)) (vector-ref vec 1)))) (void))))) (void)) (orig name from-namespace)) ((name rel-to stx load?) (lookup name rel-to stx load? (lambda (name rel-to stx load?) (let-values (((base) (if (pair? name) (if (eq? (car name) (quote submod)) (lookup (cadr name) rel-to stx load? (lambda (n r s l?) #f)) #f) #f))) (if base (make-resolved-module-path (list* (quote submod) (resolved-module-path-name base) (cddr name))) (orig name rel-to stx load?))))))))) (current-module-name-resolver embedded-resolver))))#~5.3.4.10T!%r$^AquoteF#%resolver#~5.3.4.10T%r$ #~5.3.4.10T'r$Bmodule #~5.3.4.10T%r$Bmodule gracket-Ischeme/gui/init