/usr/lib64/guile/2.0/ccache/language/objcode
Edit: /usr/lib64/guile/2.0/ccache/language/objcode/spec.go (3402B)
GOOF----LE-8-2.02
] D 4 h ] g guile g define-module* g language g objcode g spec
g filenameS f language/objcode/spec.scm g importsS
g system g base
g vm
g program
g exportsS g set-current-module g make-program g current-module g save-module-excursion g objcode->value !g map "g cdr #g sort! $g assv-ref %g
binding:index &g append! 'g collapse-locals (g program? )g program-objects *g program-meta +g program-free-variables ,g program-bindings -g program-sources .g program-objcode /g objects 0g meta 1g free-vars 2g blocs 3g sources 4g objcode? 5g error 6f /Object for disassembly not a program or objcode 7g decompile-value 8g invalidate-compilation-cache! 9g
make-language :g nameS ;g titleS
g printerS ?g
write-objcode @g compilersS Ag value Bg decompilersS Cg for-humans?SC 5 h ]4
5 4 > " G h d ] 4L> " G 4L 5 LLD \ g filenamef language/objcode/spec.scm
! " "
C h0 ] 4 5 45 & 45 DO 6 g x
0 g e 0 g opts 0 g thunk 0 g filenamef language/objcode/spec.scm
# 0 0 g nameg objcode->value C R!"# h ] C { g x
g y
g filenamef language/objcode/spec.scm
, , ) , 1 , &
C$%& h r ]!" n( 456 4455 $ $4 > " G "45 " " j g locs
g ret t g locs t g b t g t . t g filenamef language/objcode/spec.scm
(
) * + + - - ! / & / . / . .
7 1 @ 1 # E 1 R 2 Z 2 [ 4 f 4 ) i 4 l 5 t 4 t ) u ) ) g nameg collapse-locals C'R()*+,-'./0123456 h ]34 5$ t4 54 54 54 54 5 $ 45" 4 5
$ 45 "
D4 5$ D 6 g x
g env g opts g objs 0 g meta 0 g free-vars 0 g binds 0 g srcs 0 g blocs L g filenamef language/objcode/spec.scm
7
9
8 : ; < # = * > 0 : @ ? A ? L ? O @ W A b B c B ( m A @ F 8 G I I g nameg decompile-value C7R48i> " G 49i:;<=>?i@A i BA7i C5RC g m
, g filenamef language/objcode/spec.scm
(
@ 7
A K
_ L l O x P K
C6