Warning: file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found
in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 88
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 215
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 216
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 217
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 218
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 219
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 220
PK ! eÒRJMD MD server.gonu „[µü¤ GOOF----LE-8-2.05D ] Ç 4 hÌ ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g server¤ ¤
g filenameS¤ f system/repl/server.scm¤ g importsS¤
¤
¤ g ice-9¤ g threads¤ ¤ ¤ g rdelim¤ ¤ ¤ g match¤ ¤ ¤ g iconv¤ ¤ ¤ g rnrs¤ g bytevectors¤ ¤ ¤ g io¤ !g ports¤ " ! ¤ #" ¤ $g srfi¤ %g srfi-1¤ &$% ¤ '& ¤ (g srfi-26¤ )$( ¤ *) ¤ + #'* ¤ ,g exportsS¤ -g make-tcp-server-socket¤ .g make-unix-domain-server-socket¤ /g
run-server¤ 0g spawn-server¤ 1g stop-server-and-clients!¤ 2-./01 ¤ 3g set-current-module¤ 43 ¤ 53 ¤ 6g *open-sockets*¤ 7g
make-mutex¤ 8g sockets-lock¤ 9g
lock-mutex¤ :9 ¤ ;9 ¤ < ¤ ?g assq-remove!¤ @g
close-port¤ Ag
close-socket!¤ Bg add-open-socket!¤ Cg error¤ DC ¤ EC ¤ Ff no matching pattern¤ Gg hostS¤ HG
Œ¤ Ig addrS¤ JI Œ¤ Kg portS¤ LK Œ¤ MHJL ¤ Ng inet-aton¤ Og INADDR_LOOPBACK¤ Pg socket¤ Qg PF_INET¤ Rg SOCK_STREAM¤ Sg
setsockopt¤ Tg
SOL_SOCKET¤ Ug SO_REUSEADDR¤ Vg bind¤ Wg AF_INET¤ Xg pathS¤ YX
Œ¤ ZY ¤ [f /tmp/guile-socket¤ \g PF_UNIX¤ ]g AF_UNIX¤ ^g delete-duplicates¤ _g
filter-map¤ `g and=>¤ ag module-variable¤ bg the-root-module¤ cg variable-ref¤ dg EINTR¤ eg EAGAIN¤ fg EWOULDBLOCK¤ gdef ¤ hg
errs-to-retry¤ ig run-server*¤ jg serve-client¤ kg catch¤ lg select¤ mg memq¤ ng accept¤ og system-error-errno¤ pg memv¤ qg warn¤ rf Error accepting client¤ sg sleep¤ tg pipe¤ ug fcntl¤ vg F_SETFL¤ wg
O_NONBLOCK¤ xg F_GETFL¤ yg sigaction¤ zg SIGPIPE¤ {g SIG_IGN¤ |g display¤ }g force-output¤ ~g listen¤ g call-with-new-thread¤ € ¤ ¤ ‚g %thread-handler¤ ƒ‚ ¤ „‚ ¤ …g close¤ †g current-thread¤ ‡g set-thread-cleanup!¤ ˆg
cancel-thread¤ ‰g guard-against-http-request¤ Šg with-continuation-barrier¤ ‹g current-input-port¤ Œg current-output-port¤ g current-error-port¤ Žg current-warning-port¤ g
parameter?¤ ¤ ‘ ¤ ’g scm-error¤ “g wrong-type-arg¤ ”f parameterize¤ •f Not a parameter: ~S¤ –g *repl-stack*¤ —g
start-repl¤ ˜g port-closed?¤ ™g
port-encoding¤ šg set-port-encoding!¤ ›g with-temporary-port-encoding¤ œg port-line¤ g port-column¤ žg set-port-line!¤ Ÿg set-port-column!¤ g with-saved-port-line+column¤ ¡g char-ready?¤ ¢g get-bytevector-some¤ £g bytevector?¤ ¤g bytevector->string¤ ¥f
ISO-8859-1¤ ¦g string-concatenate-reverse¤ §g setvbuf¤ ¨g _IOFBF¤ ©g drain-input-and-close¤ ªg ucs-range->char-set¤ «g make-regexp¤ ¬g
string-append¤ f 2^(OPTIONS|GET|HEAD|POST|PUT|DELETE|TRACE|CONNECT) ¤ ®f [^ ]+ ¤ ¯f HTTP/[0-9]+.[0-9]+$¤ °g string-every¤ ±g regexp-exec¤ ²g permissive-http-request-line?¤ ³g read-delimited¤ ´f
¤ µg peek¤ ¶g eof-object?¤ ·g done¤ ¸g %make-void-port¤ ¹f rw¤ ºg call-with-port¤ »g dup->port¤ ¼f w¤ ½g format¤ ¾f ³
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@ POSSIBLE BREAK-IN ATTEMPT ON THE REPL SERVER @@
@@ BY AN HTTP INTER-PROTOCOL EXPLOITATION ATTACK. See: @@
@@ @@
@@ Possible HTTP request received: ~S
@@ The associated socket has been closed. @@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
¤ ¿g
unread-string¤ Àg check-for-http-request¤ Ág %set-port-property!¤ Âg guard-against-http-request?¤ Ãg %port-property¤ Äg maybe-check-for-http-request¤ Åg add-hook!¤ Æg before-read-hook¤C 5 h¸1 » ]4
+,25 45 > " G 6R47i5 8R8; h I ] L 6A g filenamef system/repl/server.scmŒ
/ ŒŒ
C> h I ] L 6A g filenamef system/repl/server.scmŒ
/ ŒŒ
C?6@ hX ¨ ] O O 4O > " G V4 5 X4O > " G 6 g s
T g x N g filenamef system/repl/server.scmŒ
.
ŒŒ / ŒŒ + 0 ŒŒ 5 0 ŒŒ 7 / ŒŒ T 3 ŒŒ T g nameg
close-socket!Œ CAR8; h I ] L 6A g filenamef system/repl/server.scmŒ
7 ŒŒ
C> h I ] L 6A g filenamef system/repl/server.scmŒ
7 ŒŒ
C6 hh ½ ]
O O 4O > " G V ŒŒ X4O > " G CX4O > " G F µ g s
c g force-close c g x c g filenamef system/repl/server.scmŒ
6
ŒŒ 7 ŒŒ / 8 ŒŒ 4 8 ŒŒ 7 7 ŒŒ c g nameg add-open-socket!Œ CBR8; h I ] L 6A g filenamef system/repl/server.scmŒ
< ŒŒ
C> h I ] L 6A g filenamef system/repl/server.scmŒ
< ŒŒ
C6EF1 hÈ ]( O O 4 O > " G V ( " Tˆ$ ?Ž ˆ$ Ž " 4455 " 4455 X4 O > " G $ 4 > " G 6 C g x
© g v , g w F { g x F { g x T c g t
© Ç g filenamef system/repl/server.scmŒ
:
ŒŒ < ŒŒ , = ŒŒ ^ @ ŒŒ h = ŒŒ ’ < ŒŒ © ; ŒŒ ² C ŒŒ Å D ŒŒ
Ç
g nameg stop-server-and-clients!Œ C1RMNOPQRSTUVW hˆ - / 0 3 # # $ 4 5" # ‘ 4
5 4 > " G 4
> " G C g host
† g addr † g port † g sock R † g filenamef system/repl/server.scmŒ
F
ŒŒ ( H ŒŒ ) H )ŒŒ I J ŒŒ R J ŒŒ U K ŒŒ l L ŒŒ †
g hostS
Œg addrS Œg portS Œ g nameg make-tcp-server-socketŒ C-RZ[P\RSTUV] h` Ð - / 0 3 # 4
5 4 > " G 4
> " G C È g path
Y g sock ' Y g filenamef system/repl/server.scmŒ
O
ŒŒ O 5ŒŒ P ŒŒ ' P ŒŒ * Q ŒŒ A R ŒŒ Y
g pathS
Πg nameg make-unix-domain-server-socketΠC.R4^i4_i`abc h l ]4 56 d g name
g filenamef system/repl/server.scmŒ
Y ŒŒ Z ŒŒ Z ŒŒ Cg55hR-ij h( Œ - . , 3 # 45 6 „ g
server-socket
! g filenamef system/repl/server.scmŒ
^
ŒŒ ^ /ŒŒ ! _ ŒŒ !
g nameg
run-serverŒ C/Rklmn h( « ]4M 5 4M 5$ CL6 £ g ready-ports
# g filenamef system/repl/server.scmŒ
s ŒŒ t ŒŒ t 8ŒŒ t <ŒŒ t ŒŒ t ŒŒ t ŒŒ v ŒŒ v
ŒŒ # w ŒŒ #
Cophqrs hP Â - 1 3 4 5 45$ L 6 4 > " G 4 > " G L 6 º g k-args
L g err L g filenamef system/repl/server.scmŒ
x ŒŒ
y ŒŒ y ŒŒ { ŒŒ z
ŒŒ # | ŒŒ $ ~ ŒŒ ( ~ ŒŒ / ~ ŒŒ 8 € ŒŒ L ŒŒ L
C h o ] LLLO L O 6 g g filenamef system/repl/server.scmŒ
q ŒŒ r ŒŒ
g nameg accept-new-clientŒ Ctuvwxyz{B|} h u ] 4!M > " G M 6 m g filenamef system/repl/server.scmŒ
i ŒŒ j ŒŒ k ŒŒ
g nameg shutdown-serverŒ C~ h J ] LLL 6 B g filenamef system/repl/server.scmŒ
ŒŒ
C„… h q ]BHHHHO Q 45 KJKJŽK J K4 4 5¡> " G 4 > " G 4
O > " G 4 > " G " b$ 2Ž 4
O > " G 45 "ÿÿÈ4J> " G 4J> " G 645 "ÿÿ“i g
server-socket
g serve-client g shutdown-pipes g shutdown-read-pipe g shutdown-write-pipe g monitored-ports g accept-new-client g client £ g
client-socket ¯ Û g client-addr ¯ Û
g filenamef system/repl/server.scmŒ
b
ŒŒ % d ŒŒ . e ŒŒ 3 f ŒŒ < n ŒŒ ? „ ŒŒ H † ŒŒ Q … ŒŒ V „ ŒŒ _ ˆ ŒŒ s ‰ ŒŒ Œ Š ŒŒ £ ‹ ŒŒ © ŒŒ ¬ Ž ŒŒ ¯ ŒŒ ¯ Ž ŒŒ ´
ŒŒ Ñ ‘ ŒŒ Û ‘
ŒŒ Ü ’ ŒŒ î “ ŒŒ ” ŒŒ ‹ ŒŒ ‹ ŒŒ ‹ ŒŒ g nameg run-server*Œ CiR-/ h J ] L 6B g filenamef system/repl/server.scmŒ
— ŒŒ
C„ h( ‘ - . , 3 # 45 O 6 ‰ g
server-socket
& g filenamef system/repl/server.scmŒ
–
ŒŒ – 1ŒŒ & — ŒŒ &
g nameg spawn-serverŒ C0R†‡A h S ] L 6K g filenamef system/repl/server.scmŒ
ŒŒ +ŒŒ
CBˆ h S ] L 6K g filenamef system/repl/server.scmŒ
Ÿ ŒŒ Ÿ (ŒŒ
C‰Š‹ŒŽ‘’“”•–— h Ü ] 4 5$ " 4 > " G 45$ " 4 > " G 45$ " 4 > " G 45$ " 4 > " G © © © ©4 ©L 54 ©L 54 ©L 54 ©L 5Y
Y4 > Z" ZCZF Ô g t-3d081069b-c3
g t-3d081069b-c4
g t-3d081069b-c5
g t-3d081069b-c6
g filenamef system/repl/server.scmŒ
¤ ŒŒ
¥ ŒŒ û © #ŒŒ þ ª ŒŒ
C h` Ó ]
45 4 O > " G 4 O > " G 4 > " G O 6 Ë g client
[ g addr [ g thread > g filenamef system/repl/server.scmŒ
™
ŒŒ › ŒŒ › ŒŒ
ŒŒ # Ÿ ŒŒ ? ¡ ŒŒ [ £ ŒŒ [ g nameg serve-clientŒ CjR˜™š h w ] 4L5$ C4L5N LM6o g filenamef system/repl/server.scmŒ
Á ŒŒ  ŒŒ
 ŒŒ à ŒŒ Ã
ŒŒ Ä
ŒŒ
C˜™š h w ] 4L5$ C4L5N LM6o g filenamef system/repl/server.scmŒ
Æ ŒŒ Ç ŒŒ
Ç ŒŒ È ŒŒ È
ŒŒ É
ŒŒ
C˜™š h w ] 4L5$ C4L5N LM6o g filenamef system/repl/server.scmŒ
Á ŒŒ  ŒŒ
 ŒŒ à ŒŒ Ã
ŒŒ Ä
ŒŒ
C˜™š h w ] 4L5$ C4L5N LM6o g filenamef system/repl/server.scmŒ
Æ ŒŒ Ç ŒŒ
Ç ŒŒ È ŒŒ È
ŒŒ É
ŒŒ
C˜™š h w ] 4L5$ C4L5N LM6o g filenamef system/repl/server.scmŒ
Æ ŒŒ Ç ŒŒ
Ç ŒŒ È ŒŒ È
ŒŒ É
ŒŒ
C hx S ] HH O O 4 O > " G V4> X4 O > " G CX4 O > " G F K g port
w g encoding w g thunk w g saved-encoding w g filenamef system/repl/server.scmŒ
¼
ŒŒ ¿ ŒŒ À ŒŒ w g nameg with-temporary-port-encodingŒg
documentationf aCall THUNK in a dynamic environment in which the encoding of PORT is
temporarily set to ENCODING.Œ C›R˜œ h( € ] 4L5$ C4L5N 4L5NC x g filenamef system/repl/server.scmŒ
Ð ŒŒ Ñ ŒŒ
Ñ ŒŒ Ò ŒŒ Ò
ŒŒ Ó ŒŒ ! Ó
ŒŒ #
C˜žŸ h0 n ] 4L5$ C4LM > " G LM6 f g filenamef system/repl/server.scmŒ
Õ ŒŒ Ö ŒŒ
Ö ŒŒ ×
ŒŒ + Ø
ŒŒ +
C˜œ h( € ] 4L5$ C4L5N 4L5NC x g filenamef system/repl/server.scmŒ
Ð ŒŒ Ñ ŒŒ
Ñ ŒŒ Ò ŒŒ Ò
ŒŒ Ó ŒŒ ! Ó
ŒŒ #
C˜žŸ h0 n ] 4L5$ C4LM > " G LM6 f g filenamef system/repl/server.scmŒ
Õ ŒŒ Ö ŒŒ
Ö ŒŒ ×
ŒŒ + Ø
ŒŒ +
C˜žŸ h0 n ] 4L5$ C4LM > " G LM6 f g filenamef system/repl/server.scmŒ
Õ ŒŒ Ö ŒŒ
Ö ŒŒ ×
ŒŒ + Ø
ŒŒ +
C hx t ]HH O O 4 O > " G V4> X4 O > " G CX4 O > " G F l g port
v g thunk v g
saved-line v g saved-column v g filenamef system/repl/server.scmŒ
Ë
ŒŒ Î ŒŒ Ï ŒŒ v g nameg with-saved-port-line+columnŒg
documentationf ƒSave the line and column of PORT before entering THUNK, and restore
their previous values upon normal or non-local exit from THUNK.Œ C R¡¢£¤¥¦ hP ]" <4L 5$ 4L 5" 45$ 45 Œ "ÿÿÊ 6 "ÿÿ½ ú g chunks
B g result B g filenamef system/repl/server.scmŒ
â ŒŒ ã ŒŒ ä ŒŒ ä ŒŒ å ŒŒ ä ŒŒ æ ŒŒ * æ
ŒŒ + ç ŒŒ 1 ç 5ŒŒ 3 ç ŒŒ 6 ç ŒŒ < ç ŒŒ B é ŒŒ B ã ŒŒ C ã ŒŒ I ã ŒŒ I
C§¨ h S ] L 6 K g filenamef system/repl/server.scmŒ
Þ ŒŒ
á ŒŒ
C@ h S ] L 6K g filenamef system/repl/server.scmŒ
ê ŒŒ ì ŒŒ
C hp 2 ] O Q O O 4 O > " G V4> X4 O > " G CX4 O > " G F * g socket
i g thunk
i g filenamef system/repl/server.scmŒ
Ú
ŒŒ
Ý ŒŒ i g nameg drain-input-and-closeŒg
documentationf Drain input from SOCKET using ISO-8859-1 encoding until it would block,
and then close it. Return the drained input as a string.Œ C©R4ªi ~54«i4¬i®¯55 °± h ß ]4L 5$ L 6C × g line
g filenamef system/repl/server.scmŒ
÷ ŒŒ ü ŒŒ ü ŒŒ ý ŒŒ g
documentationf QReturn true if LINE might plausibly be an HTTP request-line,
otherwise return #f.Œ C O ²R›¥ ³´µ¶·²¸¹‹ŒŽ©º»¼½¾¬ h ƒ ] 4L L56 { g t-3d081069b-183
g filenamef system/repl/server.scmŒ
- ŒŒ - ŒŒ 5 ŒŒ - ŒŒ C¿ h¨ Q ]4L 5 4 5$ C4 5$ s45 4 > " G 4
> " G 4 > " G 4 > " G 4
L 5 4 5 O 6 L 6 I g v
£ g void-port / | g
drained-input ƒ › g filenamef system/repl/server.scmŒ
ŒŒ
ŒŒ !ŒŒ /ŒŒ
ŒŒ
ŒŒ
ŒŒ ) ŒŒ - /ŒŒ / ŒŒ /
ŒŒ 2 ! ŒŒ D " ŒŒ V # ŒŒ h $ ŒŒ } ( "ŒŒ ƒ (
ŒŒ ˆ , ŒŒ Ž , ,ŒŒ , ŒŒ › , ŒŒ £ ;
ŒŒ £
C h S ] L L O 6 K g filenamef system/repl/server.scmŒ
ŒŒ ŒŒ
C h T ] O 6 L g socket
g filenamef system/repl/server.scmŒ
ÿ
ŒŒ 'ŒŒ ŒŒ g nameg check-for-http-requestŒg
documentationf «Check for a possible HTTP request in the initial input from SOCKET.
If one is found, close the socket and print a report to STDERR (fdes 2).
Otherwise, put back the bytes.Œ CÀRÁ h ] 6 g socket
g filenamef system/repl/server.scmŒ
=
ŒŒ D ŒŒ D ŒŒ g nameg guard-against-http-requestŒg
documentationf \Arrange for the Guile REPL to check for an HTTP request in the
initial input from SOCKET, in which case the socket will be closed.
This guards against HTTP inter-protocol exploitation attacks, a scenario
whereby an attacker can, via an HTML page, cause a web browser to send
data to TCP servers listening on a loopback interface or private
network.Œ C‰R‹ÃÂÀ˜Á hP ’ - . , 3 # 45 4 5$ (4 > " G 4 5$ C 6CŠ g socket
P g filenamef system/repl/server.scmŒ
F
ŒŒ G ŒŒ K ŒŒ K ŒŒ " K ŒŒ & K ŒŒ ' L ŒŒ 9 M ŒŒ C M ŒŒ K N "ŒŒ N N ŒŒ P
g nameg maybe-check-for-http-requestŒg
documentationf šApply check-for-http-request to SOCKET if previously requested by
guard-against-http-request. This procedure is intended to be added to
before-read-hook.Œ CÄRÅiÆiÄi6 ³ g m
, g cs
't (œ g rx 't (œ g filenamef system/repl/server.scmŒ
ŒŒ - ( ŒŒ 0 (
ŒŒ 1 * ŒŒ : *
ŒŒ .
ŒŒ 6
ŒŒ Ò :
ŒŒ “ F
ŒŒ ë O
ŒŒ ì X ŒŒ ñ Y ŒŒ
– \ ŒŒ
˜ Y ŒŒ
š X ŒŒ
W
ŒŒ g ^
ŒŒ ä b
ŒŒ –
ŒŒ N ™
ŒŒ ž ¼
ŒŒ #G Ë
ŒŒ 'U Ú
ŒŒ 'V ñ ŒŒ 'a ò ŒŒ 'f ó
ŒŒ 'l ô ŒŒ 'n õ ŒŒ 'p ö ŒŒ 'r ó
ŒŒ 't ò ŒŒ 't ñ ŒŒ (Ÿ î
ŒŒ -w ÿ
ŒŒ /¤ =
ŒŒ 1¥ F
ŒŒ 1³ Q
ŒŒ & 1³
C6 PK ! ”Á)?d' d' error-handling.gonu „[µü¤ GOOF----LE-8-2.0L' ] 4 hº ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g error-handling¤ ¤
g filenameS¤ f system/repl/error-handling.scm¤ g importsS¤
g base¤ g pmatch¤
¤ ¤ g vm¤ g
trap-state¤ ¤ ¤ g debug¤ ¤ ¤ g ice-9¤ g format¤ ¤ ¤ ¤ g exportsS¤ g call-with-error-handling¤ g with-error-handling¤ ¤ !g set-current-module¤ "! ¤ #! ¤ $g call-with-output-string¤ %g
vector-length¤ &g print-exception¤ 'g error-string¤ (g on-errorS¤ )( Œ¤ *g
post-errorS¤ +* Œ¤ ,g pass-keysS¤ -, Œ¤ .g trap-handlerS¤ /. Œ¤ 0)+-/ ¤ 1g catch¤ 2g quit¤ 32 ¤ 4g current-input-port¤ 5g current-output-port¤ 6g current-error-port¤ 7g %stacks¤ 8g narrow-stack->vector¤ 9g
make-stack¤ :f Trap ~d: ~a¤ ;g
make-debug¤ g with-error-to-port¤ ?f ~a~%¤ @f Entering a new prompt. ¤ Af 0Type `,bt' for a backtrace or `,q' to continue.
¤ B ¤ Cg
start-repl¤ DBC ¤ EBC ¤ Fg debugS¤ Gg pass¤ Hg disabled¤ Ig error¤ Jf Unknown trap-handler strategy¤ Kg with-default-trap-handler¤ Lg %start-stack¤ Mg report¤ Ng memq¤ Og throw¤ Pg run-hook¤ Qg before-error-hook¤ Rg after-error-hook¤ Sg force-output¤ Tg
procedure?¤ Uf Unknown post-error strategy¤ Vg backtrace¤ Wg print-frames¤ Xf Unknown on-error strategy¤ Yg make-syntax-transformer¤ ZY ¤ [Y ¤ \g macro¤ ]g $sc-dispatch¤ ^] ¤ _] ¤ `g any¤ a`` ¤ bg
syntax-object¤ cg top¤ dc ¤ eg ribcage¤ fg dummy¤ gg form¤ hfg ¤ ig m-82c280f576c6227-80¤ jic ¤ kjd ¤ lf l-82c280f576c6227-85¤ mf l-82c280f576c6227-86¤ nlm ¤ oehkn ¤ pe ¤ qg x¤ rq ¤ sj ¤ tf l-82c280f576c6227-82¤ ut ¤ versu ¤ wdopv ¤ xg hygiene¤ yx ¤ zb wy ¤ {g lambda¤ |b{wy ¤ }g syntax-violation¤ ~} ¤ } ¤ €f -source expression failed to match any pattern¤C 5 hx r ]4
5 4# > " G $%& h( ¦ ]
4L 5’$ L
£" LL6 ž g port
& g frame & g filenamef system/repl/error-handling.scmŒ
& ŒŒ ' ŒŒ ' ŒŒ ' ŒŒ ' 3ŒŒ ' ŒŒ & ( ŒŒ & C h ¨ ] O 6 g stack
g key g args g filenamef system/repl/error-handling.scmŒ
$
ŒŒ % ŒŒ g nameg error-stringŒ C'R013456789:;<=>?@AEF hP ± ] L$ ?4L> " G 4> " G 4> " G " L 6 © g filenamef system/repl/error-handling.scmŒ
L ŒŒ M ŒŒ O ŒŒ O ŒŒ O ŒŒ P ŒŒ # P ŒŒ ( P ŒŒ 1 Q ŒŒ 6 Q ŒŒ ; Q ŒŒ I R ŒŒ O R ŒŒ O
C h Y ] LLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
4 ŒŒ 5 ŒŒ
C h Y ] LLLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
2 ŒŒ 3
ŒŒ
C hp ‡ ]#[ˆ$ [Ž" 44 5
$ " 5 $ 45" 4
5 LLL O 6 g frame
p g trap-idx p g trap-name p g tag p g stack 2 p g error-msg L p g debug Y p g filenamef system/repl/error-handling.scmŒ
8 ŒŒ 9 ŒŒ
9 ŒŒ : ŒŒ 9 ŒŒ ; ŒŒ < ŒŒ * F ŒŒ 2 ; ŒŒ 2 9 ŒŒ : G ŒŒ ; H ŒŒ @ H 'ŒŒ F H ŒŒ L 9 ŒŒ O J ŒŒ Y 9 ŒŒ p 1 ŒŒ p g nameg debug-trap-handlerŒ CG h ° ]C ¨ g frame
g trap-idx g trap-name g filenamef system/repl/error-handling.scmŒ
T ŒŒ g nameg null-trap-handlerŒ CHIJ1KL h Y ] L 6 Q g filenamef system/repl/error-handling.scmŒ
a
ŒŒ a ŒŒ
C h Y ] ML O 6 Q g filenamef system/repl/error-handling.scmŒ
_ ŒŒ ` ŒŒ
CMNO<=>PQ&RS hH q ] 4> " G 4LLL > " G 4> " G L6 i g filenamef system/repl/error-handling.scmŒ
j ŒŒ k ŒŒ l ŒŒ , m ŒŒ C n ŒŒ C
C h Y ] LLL LO 6 Q g filenamef system/repl/error-handling.scmŒ
4 ŒŒ 5 ŒŒ
C h Y ] LLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
2 ŒŒ 3
ŒŒ
C h@ – - 1 3 4 L5$ @4L L LO > " G C Ž g key
? g args ? g filenamef system/repl/error-handling.scmŒ
e ŒŒ
f ŒŒ f ŒŒ g ŒŒ 1 ŒŒ ?
CNO h Ž - 1 3 4 L 5$ @C† g key
g args g filenamef system/repl/error-handling.scmŒ
q ŒŒ
r ŒŒ r ŒŒ s ŒŒ
CTNO h( Œ - 1 3 4 L5$ " L @ „ g k
$ g args $ g filenamef system/repl/error-handling.scmŒ
v
ŒŒ
w ŒŒ w ŒŒ $ w ŒŒ $
CUN789';<=>?@AEF hH µ ] 4L> " G 4> " G 4> " G L 6 g filenamef system/repl/error-handling.scmŒ
Ž ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ " ŒŒ + ‘ ŒŒ 0 ‘ ŒŒ 5 ‘ ŒŒ ? ’ ŒŒ E ’ ŒŒ
E
C h Y ] LLL O 6 Q g filenamef system/repl/error-handling.scmŒ
4 ŒŒ 5 ŒŒ
C h Y ] LLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
2 ŒŒ 3
ŒŒ
C hx J - 1 3 4 L5$ C[ˆ$ [Ž" 445
$ " 5 4 5 4
5 L LLO 6 B g key
w g args w g tag * w g stack H w g error-msg U w g debug b w g filenamef system/repl/error-handling.scmŒ
| ŒŒ
} ŒŒ } ŒŒ ~ ŒŒ ~ ŒŒ $ ŒŒ * ~ ŒŒ - € ŒŒ 0 ŒŒ @ Š ŒŒ H € ŒŒ H ~ ŒŒ K ‹ !ŒŒ U ~ ŒŒ X Œ ŒŒ b ~ ŒŒ w 1 ŒŒ w
CN<=>PQ&RS hH v ] 4> " G 4LLL > " G 4> " G L6 n g filenamef system/repl/error-handling.scmŒ
˜ ŒŒ ™ ŒŒ š ŒŒ , › ŒŒ C œ ŒŒ C
C h Y ] LLL LO 6 Q g filenamef system/repl/error-handling.scmŒ
4 ŒŒ 5 ŒŒ
C h Y ] LLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
2 ŒŒ 3
ŒŒ
C h@ ‘ - 1 3 4 L5$ C4L L LO > " G C ‰ g key
9 g args 9 g filenamef system/repl/error-handling.scmŒ
” ŒŒ
• ŒŒ • ŒŒ 1 ŒŒ 9
CVN789<=>WPQ&RS hX ] 4L> " G 4> " G 4L LL> " G 4> " G L 6 w g filenamef system/repl/error-handling.scmŒ
¨ ŒŒ © ŒŒ ª ŒŒ ' « ŒŒ > ¬ ŒŒ U ŒŒ U
C h Y ] LLLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
4 ŒŒ 5 ŒŒ
C h Y ] LLLLL O 6 Q g filenamef system/repl/error-handling.scmŒ
2 ŒŒ 3
ŒŒ
C hp - 1 3 4 L5$ C[ˆ$ [Ž" 445
$ " 5 4L L LO > " G C ÿ g key
m g args m g tag * m g frames H m g filenamef system/repl/error-handling.scmŒ
Ÿ ŒŒ
ŒŒ ŒŒ ¡ ŒŒ ¡ ŒŒ $ ¢ ŒŒ * ¡ ŒŒ - £ ŒŒ 0 ¤ ŒŒ @ ¦ 'ŒŒ H £ ŒŒ H ¡ ŒŒ K 1 ŒŒ m
C h w - 1 3 C o g key
g args g filenamef system/repl/error-handling.scmŒ
° ŒŒ
CNO h( - 1 3 4 L5$ " L @ ˆ g k
$ g args $ g filenamef system/repl/error-handling.scmŒ
µ
ŒŒ
¶ ŒŒ ¶ ŒŒ $ ¶ ŒŒ $
CX hx Š - / 0 3
# # # # 45 45 45 HO Q †$ " & †$
" †$ " 4
5K O †$ O " 5†$ O " !45$
O " 4 5†$ O " d†$ O " J†$ O " 0 †$ " !45$
O " 4 56‚ g thunk
x g on-error x g
post-error x g pass-keys x g trap-handler x g in J x g out J x g err J x g le-trap-handler Q x g debug-trap-handler ] x
g filenamef system/repl/error-handling.scmŒ
*
ŒŒ + -ŒŒ % + AŒŒ / , .ŒŒ 9 , EŒŒ < - ŒŒ A .
ŒŒ F /
ŒŒ J - ŒŒ o X ŒŒ “ \ ŒŒ — \ ŒŒ › \ ŒŒ ² c ŒŒ Ø u
ŒŒ â u ŒŒ ð x
ŒŒ ô x ŒŒ ø x
ŒŒ z ŒŒ V ´
ŒŒ ` ´ ŒŒ n ·
ŒŒ r · ŒŒ v ·
ŒŒ x ^ ŒŒ x
g on-errorS Œg
post-errorS Œg pass-keysS Œg trap-handlerS Œ g nameg call-with-error-handlingŒ C R4[ \_az| h ? ] C7 g dummy
g form C€ h( ª ] 4 5 $ @ 6 ¢ g x
" g tmp " g filenamef system/repl/error-handling.scmŒ
¹
ŒŒ " g
macro-typeg syntax-rulesŒg patternsg form C5 RC j g m
, g filenamef system/repl/error-handling.scmŒ
ŒŒ ã $
ŒŒ *
ŒŒ q
C6 PK ! Cõãŵ³ µ³
command.gonu „[µü¤ GOOF----LE-8-2.0³ ]8 4 h/< ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g command¤ ¤
g filenameS¤ f system/repl/command.scm¤ g importsS¤
g base¤ g syntax¤
¤ ¤ g pmatch¤
¤ ¤ g compile¤
¤ ¤ g common¤ ¤ ¤ g debug¤ ¤ ¤ g vm¤ g objcode¤ ¤ ¤ !g program¤ " ! ¤ #" ¤ $g
trap-state¤ % $ ¤ &% ¤ ' ¤ (' ¤ )g frame¤ * ) ¤ +g selectS¤ ,g frame-return-values¤ -, ¤ .*+- ¤ /g ice-9¤ 0g format¤ 1/0 ¤ 21 ¤ 3g session¤ 4/3 ¤ 54 ¤ 6g
documentation¤ 7/6 ¤ 87 ¤ 9g and-let-star¤ :/9 ¤ ;: ¤ = ¤ ?g control¤ @/? ¤ A@ ¤ Bg pretty-print¤ C/B ¤ Dg pp¤ EBDŒ¤ FE ¤ GC+F ¤ Hg inspect¤ I H ¤ Jg %inspect¤ KHJŒ¤ LK ¤ MI+L ¤ Ng statprof¤ ON ¤ PO ¤ Q #&(.258;>AGMP ¤ Rg exportsS¤ Sg meta-command¤ Tg define-meta-command¤ UST ¤ Vg autoloadsS¤ Wg language¤ X
W ¤ Yg lookup-language¤ Zg language-reader¤ [YZ ¤ \g trace¤ ] \ ¤ ^g call-with-trace¤ _^ ¤ `X[]_ ¤ ag set-current-module¤ ba ¤ ca ¤ dg help¤ eg h¤ fde ¤ gg show¤ hg ¤ ig apropos¤ jg a¤ kij ¤ lg describe¤ mg d¤ nlm ¤ odfhkn ¤ pg module¤ qg m¤ rpq ¤ sg import¤ tg use¤ ust ¤ vg load¤ wg l¤ xvw ¤ yg reload¤ zg re¤ {yz ¤ |g binding¤ }g b¤ ~|} ¤ g in¤ € ¤ prux{~€ ¤ ‚g L¤ ƒW‚ ¤ „Wƒ ¤ …g c¤ †… ¤ ‡g compile-file¤ ˆg cc¤ ‰‡ˆ ¤ Šg expand¤ ‹g exp¤ ŒŠ‹ ¤ g optimize¤ Žg opt¤ Ž ¤ g disassemble¤ ‘g x¤ ’‘ ¤ “g disassemble-file¤ ”g xx¤ •“” ¤ –†‰Œ’• ¤ —g profile¤ ˜g time¤ ™g t¤ š˜™ ¤ ›g pr¤ œ—› ¤ g tr¤ ž\ ¤ Ÿ—šœž ¤ g backtrace¤ ¡g bt¤ ¢ ¡ ¤ £g up¤ ¤£ ¤ ¥g down¤ ¦¥ ¤ §g fr¤ ¨)§ ¤ ©g procedure¤ ªg proc¤ «©ª ¤ ¬g locals¤ ¬ ¤ ®g
error-message¤ ¯g error¤ °®¯ ¤ ±g break¤ ²g br¤ ³g bp¤ ´±²³ ¤ µg break-at-source¤ ¶g break-at¤ ·g bs¤ ¸µ¶· ¤ ¹g step¤ ºg s¤ »¹º ¤ ¼g step-instruction¤ ½g si¤ ¾¼½ ¤ ¿g next¤ Àg n¤ Á¿À ¤ Âg next-instruction¤ Ãg ni¤ ÄÂà ¤ Åg finish¤ ÆÅ ¤ Çg
tracepoint¤ Èg tp¤ ÉÇÈ ¤ Êg traps¤ ËÊ ¤ Ìg delete¤ Íg del¤ ÎÌÍ ¤ Ïg disable¤ ÐÏ ¤ Ñg enable¤ ÒÑ ¤ Óg registers¤ Ôg regs¤ ÕÓÔ ¤ Ö¢¤¦¨«°´¸»¾ÁÄÆÉËÎÐÒÕ ¤ ×g i¤ ØH× ¤ ÙBD ¤ ÚHØÙ ¤ Ûg gc¤ ÜÛ ¤ Ýg
statistics¤ Þg stat¤ ßÝÞ ¤ àg option¤ ág o¤ âàá ¤ ãg quit¤ äg q¤ åg continue¤ æg cont¤ çãäåæ ¤ èÜßâç ¤ éo„–ŸÖÚè ¤ êg *command-table*¤ ëg warranty¤ ìg w¤ íëì ¤ îg copying¤ ïî… ¤ ðg version¤ ñg v¤ òðñ ¤ ógíïò ¤ ôó ¤ õg *show-table*¤ ög
group-name¤ ÷g group-commands¤ øg make-hash-table¤ ùg *command-infos*¤ úg command-name¤ ûg command-abbrevs¤ üg hashq-ref¤ ýg command-info¤ þg command-info-procedure¤ ÿg command-procedure¤ g procedure-documentation¤ g command-doc¤ g make-command-info¤ g command-info-arguments-reader¤ g substring¤ g string-index¤ g
command-usage¤ g command-summary¤ g assq¤ g lookup-group¤
g memq¤ g lookup-command¤ f $~:(~A~) Commands~:[~; [abbrev]~]:~2%¤
g for-each¤ g display-summary¤ g newline¤ g
display-group¤ g display¤ f Usage: ¤ g display-command¤ g
string-length¤ f
[,~A~{ ,~A~}]¤ f ¤ f ,~A~A~A - ~A
¤ f abbrevs too long¤ f ~%~v_¤ f ~v_¤ g catch¤ g read¤ f )Throw to key `~a' while reading command:
¤ g
display-error¤ g current-output-port¤ f 8Throw to key `~a' with args `~s' while reading command.
¤ !g force-output¤ "g read-command¤ #g read-command-arguments¤ $g and=>¤ %f Unknown meta command: ~A~%¤ &f Meta-command not a symbol: ~s~%¤ 'g
hashq-set!¤ (g append¤ )g add-meta-command!¤ *g make-syntax-transformer¤ +* ¤ ,* ¤ -g macro¤ .g $sc-dispatch¤ /. ¤ 0. ¤ 1g any¤ 211 ¤ 3g each-any¤ 431Œ¤ 514Œ¤ 625Œ¤ 713Œ¤ 817Œ¤ 968Œ¤ :19Œ¤ ;g
syntax-object¤ g ribcage¤ ?g dummy¤ @g name¤ Ag category¤ Bg expression0¤ Cg datums¤ Dg docstring¤ Eg b0¤ Fg b1¤ G?@ABCDEF ¤ Hg m-3ee4d7042b-92¤ IH< ¤ JI======== ¤ Kf l-3ee4d7042b-97¤ Lf l-3ee4d7042b-98¤ Mf l-3ee4d7042b-99¤ Nf l-3ee4d7042b-9a¤ Of l-3ee4d7042b-9b¤ Pf l-3ee4d7042b-9c¤ Qf l-3ee4d7042b-9d¤ Rf l-3ee4d7042b-9e¤ Sf l-3ee4d7042b-9f¤ TKLMNOPQRS ¤ U>GJT ¤ V> ¤ W‘ ¤ XI ¤ Yf l-3ee4d7042b-94¤ ZY ¤ [>WXZ ¤ \=UV[ ¤ ]g hygiene¤ ^] ¤ _;)\^ ¤ `g quote¤ a;`\^ ¤ bg lambda*¤ c;b\^ ¤ d( ¤ e( ¤ fg lambda¤ g;f\^ ¤ hg define¤ i;h\^ ¤ jg handle-read-error¤ k;j\^ ¤ lg form-name¤ m;l\^ ¤ ng key¤ o;n\^ ¤ pg args¤ q;p\^ ¤ rkmoq ¤ s;\^ ¤ tg unquote¤ u;t\^ ¤ vg subr¤ w;v\^ ¤ xuw ¤ yg msg¤ z;y\^ ¤ {uz ¤ |uq ¤ }g rest¤ ~;}\^ ¤ x{|u~ ¤ €;0\^ ¤ ;\^ ¤ ‚f DThrow to key `~a' while reading ~@[argument `~A' of ~]command `~A':
¤ ƒ;‚\^ ¤ „; \^ ¤ …;\^ ¤ †; \^ ¤ ‡† ¤ ˆ„…‡wzq~ ¤ ‰ˆ ¤ Šg else¤ ‹;Š\^ ¤ Œf TThrow to key `~a' with args `~s' while reading ~@[ argument `~A' of ~]command `~A'.
¤ ;Œ\^ ¤ Žg abort¤ ;Ž\^ ¤ ¤ ‘ ¤ ’g %¤ “;’\^ ¤ ”g let*¤ •;”\^ ¤ –g map¤ —– ¤ ˜– ¤ ™;\^ ¤ šg repl-reader¤ ›;š\^ ¤ œ;\^ ¤ g optionalS¤ ž;\^ ¤ Ÿg port¤ ;Ÿ\^ ¤ ¡g current-input-port¤ ¢;¡\^ ¤ £¢ ¤ ¤ £ ¤ ¥ž¤ ¤ ¦;Z\^ ¤ §g
repl-language¤ ¨;§\^ ¤ ©g current-module¤ ª;©\^ ¤ «ª ¤ ¬ « ¤ g k¤ ®;\^ ¤ ¯®qŒ¤ °®q ¤ ±;(\^ ¤ ²g list¤ ³;²\^ ¤ ´g let¤ µ;´\^ ¤ ¶g open-input-string¤ ·;¶\^ ¤ ¸g read-line¤ ¹;¸\^ ¤ º¹ ¤ »·º ¤ ¼ » ¤ ½¼ ¤ ¾g lp¤ ¿;¾\^ ¤ Àg out¤ Á;À\^ ¤ Âa ¤ ÃÁ ¤ Äà ¤ Å;‘\^ ¤ Æ; \^ ¤ ÇÆ ¤ ÈÅÇ ¤ ÉÈ ¤ Êg if¤ Ë;Ê\^ ¤ Ìg eof-object?¤ Í;Ì\^ ¤ ÎÍÅ ¤ Ïg reverse¤ Ð;Ï\^ ¤ ÑÐÁ ¤ Òg cons¤ Ó;Ò\^ ¤ ÔÓÅÁ ¤ Õ¿Ô ¤ ÖËÎÑÕ ¤ ×µÉÖ ¤ ص¿Ä× ¤ Ùµ½Ø ¤ ÚgÙ ¤ Ûk…®q ¤ Üg¯Û ¤ Ý™ÚÜ ¤ ÞÝ ¤ ß® ¤ àgß… ¤ áà ¤ â11Œ¤ ã2⌤ äã8Œ¤ å1䌤 æ?@ACDEF ¤ çI======= ¤ èf l-3ee4d7042b-ae¤ éf l-3ee4d7042b-af¤ êf l-3ee4d7042b-b0¤ ëf l-3ee4d7042b-b1¤ ìf l-3ee4d7042b-b2¤ íf l-3ee4d7042b-b3¤ îf l-3ee4d7042b-b4¤ ïf l-3ee4d7042b-b5¤ ðèéêëìíîï ¤ ñ>æçð ¤ ò=ñV[ ¤ ó;Tò^ ¤ ô15Œ¤ õô8Œ¤ ö1õŒ¤ ÷?@BCDEF ¤ øf l-3ee4d7042b-c0¤ ùf l-3ee4d7042b-c1¤ úf l-3ee4d7042b-c2¤ ûf l-3ee4d7042b-c3¤ üf l-3ee4d7042b-c4¤ ýf l-3ee4d7042b-c5¤ þf l-3ee4d7042b-c6¤ ÿf l-3ee4d7042b-c7¤ øùúûüýþÿ ¤ >÷ç ¤ =V[ ¤ ;T^ ¤ ;^ ¤ ¤ 1⌤ 8Œ¤ 1Œ¤ ?@CDEF ¤
I====== ¤ f l-3ee4d7042b-d3¤ f l-3ee4d7042b-d4¤
f l-3ee4d7042b-d5¤ f l-3ee4d7042b-d6¤ f l-3ee4d7042b-d7¤ f l-3ee4d7042b-d8¤ f l-3ee4d7042b-d9¤
¤ >
¤ =V[ ¤ ;T^ ¤ ;^ ¤ ¤ g syntax-violation¤ ¤ ¤ f -source expression failed to match any pattern¤ f Command Groups:
¤ f help all¤ f List all commands¤ g symbol->string¤ g
string-append¤ !f help ¤ "f List ¤ #f commands¤ $f FType `,help -c COMMAND' to show documentation of a particular command.¤ %g -c¤ &f Unknown command: ~A~%¤ 'f Bad arguments: ~A~%¤ (f Unknown command or group: ~A~%¤ )g all¤ *g default-prompt-tag¤ +@* ¤ ,@* ¤ -f Unknown topic: ~A~%¤ .g
*warranty*¤ /g *copying*¤ 0g *version*¤ 1g ->string¤ 2g object-documentation¤ 3g
repl-parse¤ 4g
module-ref¤ 5g repl-eval¤ 6g form¤ 7f ~A~24t~A
¤ 8g repl-options¤ 9g repl-option-set!¤ :g eval¤ ;g repl-option-ref¤ g module-name¤ ?g resolve-module¤ @g module-uses¤ Ag resolve-interface¤ Bg module-use!¤ Cf No such module: ~A~%¤ Dg load-in-vicinity¤ ED ¤ FD ¤ Gf system/repl¤ Hg
reload-module¤ Ig module-for-each¤ Jf ~23A ~A
¤ Kg ensureS¤ Lg save-module-excursion¤ Mg
repl-print¤ Nf FInvalid arguments to `in': expected a single expression or a command.
¤ Of No such module: ~s
¤ Pf 6Happy hacking with ~a! To switch back, type `,L ~a'.
¤ Qg language-title¤ Rg
language-name¤ Sg current-language¤ Tg setter¤ UT ¤ VT ¤ Wg repl-compile¤ Xg objcode?¤ Yg guile:disassemble¤ Zg optsS¤ [g repl-expand¤ \g run-hook¤ ]g before-print-hook¤ ^g
repl-optimize¤ _g assembly¤ `W_ ¤ a` ¤ b` ¤ cg program?¤ df 9Argument to ,disassemble not a procedure or objcode: ~a~%¤ eg load-objcode¤ fg gc-run-time¤ gg get-internal-real-time¤ hg get-internal-run-time¤ if 8;; ~,6Fs real time, ~,6Fs run time. ~,6Fs spent in GC.
¤ je 1.0¤ kg internal-time-units-per-second¤ lg repl-prepare-eval-thunk¤ mg widthS¤ ng terminal-width¤ og define-stack-command¤ pg _¤ qpŒ¤ rg
datum->syntax¤ sg frames¤ tg message¤ ug for-trap?¤ vg index¤ wg cur¤ x1111111 ¤ yg t-3ee4d7042b-8e0¤ zg t-3ee4d7042b-8e1¤ {g t-3ee4d7042b-8e2¤ |g t-3ee4d7042b-8e3¤ }g t-3ee4d7042b-8e6¤ ~g t-3ee4d7042b-8e5¤ g t-3ee4d7042b-8e4¤ €yz{|}~ ¤ g m-3ee4d7042b-8e7¤ ‚< ¤ ƒ‚‚‚‚‚‚‚ ¤ „f l-3ee4d7042b-8eb¤ …f l-3ee4d7042b-8ec¤ †f l-3ee4d7042b-8ed¤ ‡f l-3ee4d7042b-8ee¤ ˆf l-3ee4d7042b-8ef¤ ‰f l-3ee4d7042b-8f0¤ Šf l-3ee4d7042b-8f1¤ ‹„…†‡ˆ‰Š ¤ Œ>€ƒ‹ ¤ g body¤ Žg body*¤ @pDŽ ¤ ====== ¤ ‘f l-3ee4d7042b-8d4¤ ’f l-3ee4d7042b-8d5¤ “f l-3ee4d7042b-8d6¤ ”f l-3ee4d7042b-8d7¤ •f l-3ee4d7042b-8d8¤ –f l-3ee4d7042b-8d9¤ —‘’“”•– ¤ ˜>— ¤ ™= ¤ šf l-3ee4d7042b-8d1¤ ›š ¤ œ>W™› ¤ =VŒ˜Vœ ¤ ž;T^ ¤ Ÿ;´^ ¤ ;^ ¤ ¡g
repl-debug¤ ¢;¡^ ¤ £;Ê^ ¤ ¤g
letrec-syntax¤ ¥;¤^ ¤ ¦g identifier-syntax¤ §;¦^ ¤ ¨g debug-frames¤ ©;¨^ ¤ ª© ¤ «§ª ¤ ¬« ¤ g debug-error-message¤ ®;^ ¤ ¯® ¤ °§¯ ¤ ±° ¤ ²g debug-for-trap?¤ ³;²^ ¤ ´³ ¤ µ§´ ¤ ¶µ ¤ ·g id¤ ¸;·^ ¤ ¹g debug-index¤ º;¹^ ¤ »º ¤ ¼¸» ¤ ½g set!¤ ¾;½^ ¤ ¿;‹^ ¤ À¾¸¿ ¤ Á¾»¿ ¤ ÂÀÁ ¤ ç¼Â ¤ Äà ¤ Åg
vector-ref¤ Æ;Å^ ¤ Ç;0^ ¤ È;^ ¤ Éf Nothing to debug.~%¤ Ê;É^ ¤ ËÇÈÊ ¤ ÌË ¤ Ím Œ¤ Îg full?S¤ ÏÎ Œ¤ ÐÍÏ ¤ Ñg print-frames¤ Òg countS¤ Óg for-trap?S¤ Ôg integer?¤ Õf BInvalid argument to `up': expected a positive integer for COUNT.~%¤ Ög
vector-length¤ ×f Already at outermost frame.
¤ Øg print-frame¤ Ùg indexS¤ Úg next-source?S¤ Ûf DInvalid argument to `down': expected a positive integer for COUNT.~%¤ Üf Already at innermost frame.
¤ Ýf GInvalid argument to `frame': expected a non-negative integer for IDX.~%¤ Þf No such frame.~%¤ ßg frame-procedure¤ àm Œ¤ áà ¤ âg print-locals¤ ãf ~a~%¤ äg string?¤ åf No error message¤ æg
procedure?¤ çg add-trap-at-procedure-call!¤ èf Trap ~a: ~a.~%¤ ég trap-name¤ êf Not a procedure: ~a¤ ëg add-trap-at-source-location!¤ ìg default-prompt-handler¤ í@ì ¤ î@ì ¤ ïg frame->stack-vector¤ ðg frame-previous¤ ñf No return values.~%¤ òf Return values:~%¤ ó ¤ ôg
start-repl¤ õg debugS¤ ög
make-debug¤ ÷g repl-pop-continuation-resumer¤ øf Return from ~a¤ ùg #add-ephemeral-trap-at-frame-finish!¤ úg repl-next-resumer¤ ûf Step into ~a¤ üg add-ephemeral-stepping-trap!¤ ýg into?S¤ þg instruction?S¤ ÿg add-trace-at-procedure-call!¤ g
list-traps¤ f No traps set.~%¤ f ~a: ~a~a~%¤ g
trap-enabled?¤ f (disabled)¤ g delete-trap!¤ f .expected a trap index (a non-negative integer)¤ g
disable-trap!¤ g enable-trap!¤ g print-registers¤
g width¤ f !Set screen width to ~a columns.~%¤ g times¤
g gc-stats¤ g
repl-tm-stats¤ g
repl-gc-stats¤ g assq-ref¤ g gc-times¤ g display-diff-stat¤ f GC times:¤ f times¤ g heap-size¤ g heap-free-size¤ g display-stat-title¤ f Memory size:¤ f current¤ f limit¤ g display-stat¤ f heap¤ f bytes¤ g heap-total-allocated¤ f Bytes allocated:¤ f diff¤ !f total¤ "f allocated¤ #g
gc-time-taken¤ $f GC time taken:¤ %g display-time-stat¤ &g tms:utime¤ 'g tms:stime¤ (g
tms:cutime¤ )g
tms:cstime¤ *f Process time spent:¤ +f user¤ ,f system¤ -f
child user¤ .f child system¤ /f ~~20~AA ~~10@A /~~10@A ~~A~~%¤ 0f @¤ 1f ~10,2F¤ 2g exact->inexact¤ 3f s¤ 4f ----¤ 5e 1000000.0¤ 6f mips¤ 7g display-mips-stat¤C 5 hÈo C ]4
QRUV`5 4c > " G éêRôõR h x ] C p g g
g filenamef system/repl/command.scmŒ
J
ŒŒ J ŒŒ g nameg
group-nameŒ CöR h | ] ŽC t g g
g filenamef system/repl/command.scmŒ
K
ŒŒ K ŒŒ g nameg group-commandsŒ C÷R4øi5 ùR h z ] C r g c
g filenamef system/repl/command.scmŒ
N
ŒŒ N ŒŒ g nameg command-nameŒ CúR h } ] ŽC u g c
g filenamef system/repl/command.scmŒ
O
ŒŒ O ŒŒ g nameg command-abbrevsŒ CûRüùú h ‚ ]4 56 z g c
g filenamef system/repl/command.scmŒ
P
ŒŒ P 4ŒŒ P ŒŒ g nameg command-infoŒ CýRþý h ‡ ]4 56 g c
g filenamef system/repl/command.scmŒ
Q
ŒŒ Q 6ŒŒ
Q ŒŒ
g nameg command-procedureŒ CÿR ÿ h ]4 56 y g c
g filenamef system/repl/command.scmŒ
R
ŒŒ R 1ŒŒ
R ŒŒ
g nameg command-docŒ CR h ] ŒC˜ g proc
g arguments-reader g filenamef system/repl/command.scmŒ
T
ŒŒ U ŒŒ g nameg make-command-infoŒ CR h ‡ ] C g info
g filenamef system/repl/command.scmŒ
W
ŒŒ X ŒŒ g nameg command-info-procedureŒ CþR h Ž ] ŽC † g info
g filenamef system/repl/command.scmŒ
Z
ŒŒ [ ŒŒ g nameg command-info-arguments-readerŒ CR h £ ] 4 5
4
56 › g c
g doc g filenamef system/repl/command.scmŒ
]
ŒŒ ^
ŒŒ ^ ŒŒ _ ŒŒ _ ŒŒ g nameg
command-usageŒ CR h@ ï ]4 5 4
5— 4
5 $
66 ç g c
< g doc < g start < g t " < g filenamef system/repl/command.scmŒ
a
ŒŒ b ŒŒ b ŒŒ c ŒŒ c ŒŒ b ŒŒ d ŒŒ " d ŒŒ 4 e ŒŒ < f ŒŒ < g nameg command-summaryŒ CRê h } ] 6 u g name
g filenamef system/repl/command.scmŒ
h
ŒŒ
i ŒŒ
g nameg lookup-groupŒ C Rê
hx ; - . , 3 # " N" 4( ŽŽ "ÿÿç4 5$ CŽ "ÿÿÈ( ( C"ÿÿº"ÿÿ¶ "ÿÿ§ 3 g key
s g table s g groups h g commands h g filenamef system/repl/command.scmŒ
k
ŒŒ l ŒŒ $ m ŒŒ ' o ŒŒ * o ŒŒ 3 o ŒŒ 4 p ŒŒ ; p ŒŒ = p ŒŒ A m ŒŒ D p %ŒŒ J q ŒŒ R q ŒŒ R m ŒŒ ^ m ŒŒ h l ŒŒ k l &ŒŒ s l ŒŒ s g nameg lookup-commandŒ C R0 ö
û h( Š ]4 5L $ 4 5" 4 56 ‚ g c
& g filenamef system/repl/command.scmŒ
u ŒŒ v ŒŒ w ŒŒ w +ŒŒ w ?ŒŒ x ŒŒ & v ŒŒ & C÷ hX Ì - . , 3 # 44 5> " G 4O 4 5> " G 6 Ä g group
S g abbrev? S g filenamef system/repl/command.scmŒ
s
ŒŒ t ŒŒ t
ŒŒ t 4ŒŒ ) t ŒŒ 2 u ŒŒ < y ŒŒ G u ŒŒ S z ŒŒ
S g nameg
display-groupŒ CR h0 ³ ]4> " G 44 5> " G 6 « g command
/ g filenamef system/repl/command.scmŒ
|
ŒŒ } ŒŒ } ŒŒ } ŒŒ ~ ŒŒ ~ ŒŒ # ~ ŒŒ / ŒŒ / g nameg display-commandŒ CR0¯
hˆ ]4 5 ˆ$ 4Ž5" 45 ”$
45" 0– ”$ 4 ˜–5" 4 ˜˜56 g usage
„ g abbrevs „ g summary „ g usage-len „ g abbrevs & „ g abbrevs-len / „ g filenamef system/repl/command.scmŒ
ŒŒ ‚ ŒŒ ‚ ŒŒ ƒ ŒŒ ƒ ŒŒ „ ŒŒ „ !ŒŒ „ 1ŒŒ „ ?ŒŒ „ ŒŒ & … ŒŒ & ‚ ŒŒ ) † ŒŒ / ‚ ŒŒ 6 ‡ ŒŒ = Š ŒŒ A ‰ ŒŒ B ‹ ŒŒ F ‹ ŒŒ J ‹ ŒŒ S Œ ŒŒ V Œ ŒŒ Z ‰ ŒŒ [ ŒŒ ` ŒŒ g &ŒŒ h !ŒŒ j ŒŒ o ŒŒ t ŒŒ y ŒŒ ~ ŒŒ „ ‡ ŒŒ " „ g nameg display-summaryŒ CR h T ] 6 L g filenamef system/repl/command.scmŒ
• ŒŒ • ŒŒ
C0 ! hè d - 1 3 ˆ$ «Ž ˆ$ yŽ ˆ$ GŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 4> " G C \ g key
ä g args ä g vx · g vy · g vx ' – g vy ' – g vx 8 u g vy 8 u g filenamef system/repl/command.scmŒ
– ŒŒ — ŒŒ = ™ ŒŒ B ™ ŒŒ I ™ ŒŒ R š ŒŒ V š ŒŒ g š ŒŒ z œ ŒŒ œ ŒŒ ˆ œ ŒŒ œ ŒŒ © œ ŒŒ Á œ ŒŒ Ê œ ŒŒ Ó ž ŒŒ ä
C h ]6 w g repl
g filenamef system/repl/command.scmŒ
“
ŒŒ ” ŒŒ g nameg read-commandŒ C"Rý h ³ ]44 556 « g c
g repl g filenamef system/repl/command.scmŒ
¡
ŒŒ ¢ ŒŒ ¢ "ŒŒ ¢ ŒŒ ¢ ŒŒ g nameg read-command-argumentsŒ C#R" $#ÿ h p ]4L5L @ h g args
g filenamef system/repl/command.scmŒ
ŒŒ (ŒŒ !ŒŒ C0%& hX ]4 5 & CŠ$ .45 $ 4 5 O 666 g repl
R g command R g t " I g filenamef system/repl/command.scmŒ
¤
ŒŒ ¥ ŒŒ ¥ ŒŒ ¦ ŒŒ § ŒŒ ¨ ŒŒ ¦ ŒŒ ª ŒŒ " ¦ ŒŒ - ¬ ŒŒ @ ¬ ŒŒ E ¯ ŒŒ I ¯ ŒŒ N © ŒŒ R © ŒŒ R g nameg meta-commandŒ CSR'ùê( hh ~ ] 4 45> " G $ >45 $ 4Ž 5C4 5 CC v g name
e g category e g proc e g argument-reader e g entry . c g filenamef system/repl/command.scmŒ
±
ŒŒ ² ŒŒ
² #ŒŒ ² ŒŒ % ³ ŒŒ & ´ ŒŒ . ´ ŒŒ 6 µ ŒŒ 9 ¶ ŒŒ > ¶ $ŒŒ C ¶ 6ŒŒ F ¶ 0ŒŒ H ¶ ŒŒ I ¶ ŒŒ L ¸ ŒŒ W ¹ /ŒŒ Z ¹ ŒŒ ] ¹ ŒŒ _ ¸ ŒŒ a · ŒŒ e g nameg add-meta-command!Œ C)R4 ,T-0:_acegirsq€ƒom‰‹‘“•˜™g›œc¥¦¨¬¯ka° hH 9 ] L
Œ
ŒŒ C 1 g tmp-3ee4d7042b-ab
F F C±³Þá h¨ Õ , 3 45ŒŒŒŒŒ
ŒŒ ŒŒŒ4O 5ŒŒŒ ŒŒ C Í g dummy
¥ g name ¥ g category ¥ g repl ¥ g expression0 ¥ g datums ¥ g docstring ¥ g b0 ¥ g b1 ¥ ¥ Cåó h( ² , 3 ŒŒŒŒŒŒŒC ª g dummy
" g name " g category " g repl " g datums " g docstring " g b0 " g b1 " " Cö h( µ , 3 ŒŒŒŒŒŒŒŒC g dummy
! g name ! g repl ! g expression0 ! g datums ! g docstring ! g b0 ! g b1 ! ! C h œ ]ŒŒŒŒŒŒŒŒC ” g dummy
g name g repl g datums g docstring g b0 g b1 C hh ]!4 5 $ @4 5 $ @4 5 $ @4 5 $ @
6 g x
g g tmp g g tmp " g g tmp 9 g g tmp P g g filenamef system/repl/command.scmŒ
¼ ŒŒ g g
macro-typeg syntax-rulesŒg patternsg nameg category g replg expression0g ... g datumsŒŒŒg docstringg b0g b1g ... g nameg category g replg datumsŒŒg docstringg b0g b1g ... g nameg replg expression0g ... g datumsŒŒŒg docstringg b0g b1g ... g nameg replg datumsŒŒg docstringg b0g b1g ... C5TR4)id d
ö !"# h8 ]44 55 45 45 6 g g
1 g name 1 g usage 1 g header & 1 g filenamef system/repl/command.scmŒ
ŒŒ
ŒŒ
.ŒŒ
ŒŒ
ŒŒ ŒŒ .ŒŒ ŒŒ
ŒŒ ŒŒ /ŒŒ $ <ŒŒ & ŒŒ &
ŒŒ 1 ŒŒ 1 Cê$%0&'( ) h j - 1 3 ( y445> " G 4> " G 4> " G 4
Ž> " G 4 > " G 4
> " G 6 " a" $" ç" ‰" ]ˆ$ MŽ & 2ˆ$ "Ž ( 66666ˆ$ Ž ( 6"ÿÿ"ÿÿ{ˆ$ OŽ & 9ˆ$ .Ž ( 45$ 456"ÿÿ-"ÿÿ)"ÿÿ%"ÿÿ!"ÿÿ ˆ$ .Ž ( 45$ 456"ÿþè"ÿþä"ÿþàˆ$ .Ž ( 45$ 456"ÿþ«"ÿþ§"ÿþ£ˆ$ (Ž & ( 6"ÿþt"ÿþp"ÿþlb g repl
g args g vx © ð g vy © ð g vx Â Þ g vy Â Þ g vx g vy g vx . w g vy . w g vx G o g vy G o g vx ˆ ° g vy ˆ ° g vx Á é g vy Á é g vx ú g vy ú g filenamef system/repl/command.scmŒ
ú
ŒŒ ŒŒ ŒŒ ŒŒ "ŒŒ ŒŒ ŒŒ '
ŒŒ +
ŒŒ 0
ŒŒ 9 ŒŒ = ŒŒ @ $ŒŒ E ŒŒ N ŒŒ U ŒŒ Z ŒŒ c ŒŒ s ŒŒ w ŒŒ | ŒŒ ˆ ŒŒ Œ ŒŒ Ñ ! ŒŒ Õ ! ŒŒ Ú # ŒŒ Þ # ŒŒ ã # ŒŒ ç # ŒŒ ì # ŒŒ ð # ŒŒ õ # ŒŒ ù # ŒŒ ù ŒŒ ŒŒ ŒŒ ŒŒ R ŒŒ \ ŒŒ _ ŒŒ g ŒŒ k ŒŒ “ ŒŒ ŒŒ ŒŒ ¨ ŒŒ ¬ ŒŒ Ì ŒŒ Ö ŒŒ Ù ŒŒ á ŒŒ å ŒŒ ŒŒ ŒŒ 7
g
documentationf Ãhelp [all | GROUP | [-c] COMMAND]
Show help.
With one argument, tries to look up the argument as a group name, giving
help on that group if successful. Otherwise tries to look up the
argument as a command, giving help on the command.
If there is a command whose name is also a group name, use the ,help
-c COMMAND form to give help on the command instead of the group.
Without any argument, a list of help commands and command groups
are displayed.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ú
ŒŒ >
C0‚d ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ú
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ú
ŒŒ , C> " G 4)igõ ÿ0-' h¨ Õ - 1 3 ( 4> " G 6 ˆ$ qŽ ( A45$ 4455 6Ž ( 66 ( 666Í g repl
¨ g args ¨ g vx 4 Ÿ g vy 4 Ÿ g vx c g vy c g vx ƒ Ÿ g vy ƒ Ÿ g filenamef system/repl/command.scmŒ
%
ŒŒ / ŒŒ 1 ŒŒ 1 ŒŒ 1 ŒŒ ' 2 ŒŒ * / ŒŒ ? 3 ŒŒ K / ŒŒ L 4 ŒŒ O 4 ŒŒ Y 4 ŒŒ ] 4 ŒŒ ` / ŒŒ r 6 ŒŒ v 6 ŒŒ { 8 ŒŒ 8 ŒŒ / ŒŒ ’ 6 ŒŒ – 6 ŒŒ › 8 ŒŒ Ÿ 8 ŒŒ ¤ 8 ŒŒ ¨ 8 ŒŒ ¨
g
documentationf show [TOPIC]
Gives information about Guile.
With one argument, tries to show a particular piece of information;
currently supported topics are `warranty' (or `w'), `copying' (or `c'),
and `version' (or `v').
Without any argument, a list of topics is displayed.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
%
ŒŒ >
C0‚g ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
%
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
%
ŒŒ , C> " G 4)ië. h ³ ]4> " G 6 « g repl
g filenamef system/repl/command.scmŒ
>
ŒŒ A ŒŒ B ŒŒ g
documentationf .show warranty
Details on the lack of warranty.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
>
ŒŒ >
C0‚ë ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
>
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
>
ŒŒ , C> " G 4)iî/ h ¢ ]4> " G 6 š g repl
g filenamef system/repl/command.scmŒ
D
ŒŒ G ŒŒ H ŒŒ g
documentationf show copying
Show the LGPLv3.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
D
ŒŒ >
C0‚î ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
D
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
D
ŒŒ , C> " G 4)ið0 h ¦ ]4> " G 6 ž g repl
g filenamef system/repl/command.scmŒ
J
ŒŒ M ŒŒ N ŒŒ g
documentationf !show version
Version information.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
J
ŒŒ >
C0‚𠌎 hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
J
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
J
ŒŒ , C> " G 4)iii1 h Ç ]456 ¿ g repl
g regexp
g filenamef system/repl/command.scmŒ
P
ŒŒ S ŒŒ
S ŒŒ
g
documentationf .apropos REGEXP
Find bindings/modules/packages.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
P
ŒŒ >
C0‚i ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
P
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
P
ŒŒ , C> " G 4)il234©5 hP 9 ]
444 5 Š$ 445 5" 4 5 5> " G 6 1 g repl
I g form I g input 6 g filenamef system/repl/command.scmŒ
U
ŒŒ X ŒŒ Y ŒŒ Z ŒŒ Z ŒŒ [ ŒŒ [ ŒŒ \ ŒŒ \ ŒŒ & \ ŒŒ + ] ŒŒ 8 Y ŒŒ = X ŒŒ I ^ ŒŒ I g
documentationf ,describe OBJ
Show description/documentation.Œ C0‚l ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
U
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
U
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
U
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
U
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
U
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
U
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
U
ŒŒ M C> " G 4)ià
07 h ‚ ] Ž6z g spec
g filenamef system/repl/command.scmŒ
e ŒŒ f ŒŒ
f +ŒŒ
f 6ŒŒ f ŒŒ C89:©;
h – - 1 3 (
4 56" Bˆ$ 9Ž ˆ$ &Ž ( 445 56CCCˆ$ 1Ž ( 44 5> " G 6 "ÿÿ†"ÿÿ‚ Ž g repl
ž g args ž g vx - ` g vy - ` g vx > ^ g vy > ^ g vx o š g vy o š g filenamef system/repl/command.scmŒ
`
ŒŒ c ŒŒ g ŒŒ e ŒŒ c ŒŒ O n !ŒŒ T n +ŒŒ Z n !ŒŒ \ n ŒŒ b c ŒŒ z i ŒŒ } i ŒŒ Š i ŒŒ – j ŒŒ š c ŒŒ ž
g
documentationf *option [NAME] [EXP]
List/show/set options.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
`
ŒŒ >
C0‚à ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
`
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
`
ŒŒ , C> " G 4)iã<ã h œ ]6” g repl
g filenamef system/repl/command.scmŒ
p
ŒŒ s ŒŒ s ŒŒ g
documentationf quit
Quit this session.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
p
ŒŒ >
C0‚ã ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
p
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
p
ŒŒ , C> " G 4)ip=>©a? hh k - 1 3 ( 445 56ˆ$ 8Ž ( ‰$ 456456456456 c g repl
g g args g g vx * \ g vy * \ g filenamef system/repl/command.scmŒ
z
ŒŒ } ŒŒ ~ ŒŒ ~ ŒŒ ~ ŒŒ ~ ŒŒ } ŒŒ 7 ŒŒ ; } ŒŒ > € ŒŒ F € ŒŒ I #ŒŒ Q ŒŒ T #ŒŒ \ ŒŒ _ #ŒŒ g ŒŒ g
g
documentationf 5module [MODULE]
Change modules / Show current module.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
z
ŒŒ >
C0‚p ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
z
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
z
ŒŒ , C> " G 4)is
=–>@©AB©0C h( ½ ] 4 5 $ 45 6 6 µ g name
% g mod % g filenamef system/repl/command.scmŒ
‡ ŒŒ ˆ ŒŒ ˆ ŒŒ ‰ ŒŒ Š ŒŒ Š ŒŒ ! ‹ ŒŒ % ‹ ŒŒ % g nameg useŒ C h0 - 1 3 ( 4445 5566 ÿ g repl
. g args . g filenamef system/repl/command.scmŒ
ƒ
ŒŒ Œ ŒŒ ŒŒ (ŒŒ 5ŒŒ " (ŒŒ $ ŒŒ & ŒŒ . Ž ŒŒ
.
g
documentationf 9import [MODULE ...]
Import modules / List those imported.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ƒ
ŒŒ >
C0‚s ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ƒ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ƒ
ŒŒ , C> " G 4)ivFG1 h Ì ]456 Ä g repl
g file g filenamef system/repl/command.scmŒ
ŒŒ “ ŒŒ “ ŒŒ “ ŒŒ g
documentationf ,load FILE
Load a file in the current module.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C0‚v ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ŒŒ , C> " G 4)iyH©? hh u - 1 3 ( 45 6ˆ$ 8Ž ( ‰$ 456456456456 m g repl
b g args b g vx % W g vy % W g filenamef system/repl/command.scmŒ
•
ŒŒ ˜ ŒŒ ™ ŒŒ ™ ŒŒ ˜ ŒŒ 2 š ŒŒ 6 ˜ ŒŒ 9 › ŒŒ A › ŒŒ D œ ŒŒ L œ ŒŒ O œ ŒŒ W œ ŒŒ Z œ ŒŒ b œ ŒŒ b
g
documentationf Qreload [MODULE]
Reload the given module, or the current module if none was given.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
•
ŒŒ >
C0‚y ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
•
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
•
ŒŒ , C> " G 4)i|I0J h | ] 6 t g k
g v
g filenamef system/repl/command.scmŒ
¡ ŒŒ ¡ ,ŒŒ
¡ !ŒŒ
C© h £ ]45 6 › g repl
g filenamef system/repl/command.scmŒ
ž
ŒŒ ¢ ŒŒ
¡ ŒŒ
g
documentationf binding
List current bindings.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ž
ŒŒ >
C0‚| ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ž
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ž
ŒŒ , C> " G 4)i?Kt Laÿ h( x ] 4L> " G 44L 55LL@ p g filenamef system/repl/command.scmŒ
¬ ŒŒ ŒŒ ® ŒŒ ® (ŒŒ ® ŒŒ & ® ŒŒ &
CM:0NO h ½ - 1 3 45 $ ؈$ µŽ & ‡ˆ$ dŽ ( 845$ O 6( 456
6( 456
6( 456
6( 456
6( 456
6 6 µ g repl
ü g module ü g command-or-expression ü g args ü g m ü g vx ( × g vy ( × g vx A Ÿ g vy A Ÿ g filenamef system/repl/command.scmŒ
¤
ŒŒ
§ ŒŒ § ŒŒ ¨ ŒŒ © ŒŒ L ª &ŒŒ V © ŒŒ g « ŒŒ m © ŒŒ r ± ŒŒ | ± ŒŒ ³ ŒŒ ƒ ³ ŒŒ ‰ © ŒŒ Ž ± ŒŒ ˜ ± ŒŒ ³ ŒŒ Ÿ ³ ŒŒ ¥ © ŒŒ ª ± ŒŒ ´ ± ŒŒ ¹ ³ ŒŒ » ³ ŒŒ Á © ŒŒ Æ ± ŒŒ Ð ± ŒŒ Õ ³ ŒŒ × ³ ŒŒ Ý © ŒŒ â ± ŒŒ ì ± ŒŒ ñ ³ ŒŒ ó ³ ŒŒ ø ´ ŒŒ ü ´ ŒŒ $ ü
g
documentationf [in MODULE COMMAND-OR-EXPRESSION
Evaluate an expression or command in the context of module.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
¤
ŒŒ >
C0‚ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
¤
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
¤
ŒŒ , C> " G 4)iWY§0PQRSV hX % ]454 5 44545> " G 4> " G 45 6 g repl
T g name T g lang T g cur T g filenamef system/repl/command.scmŒ
»
ŒŒ ¾ ŒŒ
¿
ŒŒ ¾ ŒŒ À ŒŒ À ŒŒ Á ŒŒ " Á "ŒŒ - À ŒŒ 6  ŒŒ T à ŒŒ T g
documentationf #language LANGUAGE
Change languages.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
»
ŒŒ >
C0‚W ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
»
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
»
ŒŒ , C> " G 4)iW3XYM h0 ÿ ]
4 4 55 45$ 6 6 ÷ g repl
- g form - g x - g filenamef system/repl/command.scmŒ
Ê
ŒŒ Í ŒŒ Í ŒŒ Í ŒŒ Í ŒŒ Î ŒŒ Î ŒŒ % Î ŒŒ - Ï ŒŒ
- g
documentationf #compile EXP
Generate compiled code.Œ C0‚ ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
Ê
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
Ê
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
Ê
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ê
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
Ê
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ê
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
Ê
ŒŒ M C> " G 4)i‡‡1Z h Í - 1 3 456Å g repl
g file g opts g filenamef system/repl/command.scmŒ
Ñ
ŒŒ Ô ŒŒ Ô ŒŒ
g
documentationf !compile-file FILE
Compile a file.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
Ñ
ŒŒ >
C0‚‡ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
Ñ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
Ñ
ŒŒ , C> " G 4)iŠ[3\]D h0 ñ ]
4 4 55 4> " G 6 é g repl
. g form . g x . g filenamef system/repl/command.scmŒ
Ö
ŒŒ Ù ŒŒ Ù ŒŒ Ù ŒŒ Ù ŒŒ Ú ŒŒ . Û ŒŒ . g
documentationf 'expand EXP
Expand any macros in a form.Œ C0‚Š ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
Ö
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
Ö
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
Ö
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ö
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
Ö
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ö
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
Ö
ŒŒ M C> " G 4)i^3\]D h0 ]
4 4 55 4> " G 6 g repl
. g form . g x . g filenamef system/repl/command.scmŒ
Ý
ŒŒ à ŒŒ à ŒŒ à ŒŒ à ŒŒ á ŒŒ . â ŒŒ . g
documentationf Goptimize EXP
Run the optimizer on a piece of code and print the result.Œ C0‚ ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
Ý
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
Ý
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
Ý
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ý
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
Ý
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
Ý
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
Ý
ŒŒ M C> " G b h Š ] 6‚ g x
g filenamef system/repl/command.scmŒ
ä
ŒŒ å ŒŒ å ŒŒ g nameg guile:disassembleŒ CYR4)i53cXY0d hH 9 ]4 4 55 45 $ " 45 $ 66 1 g repl
E g form E g obj E g t 2 g filenamef system/repl/command.scmŒ
ç
ŒŒ ê
ŒŒ ê ŒŒ ê
ŒŒ ê ŒŒ ë ŒŒ ë ŒŒ ) ë ŒŒ 6 ë ŒŒ < ì ŒŒ A í ŒŒ E í ŒŒ
E g
documentationf 1disassemble EXP
Disassemble a compiled procedure.Œ C0‚ ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
ç
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
ç
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
ç
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ç
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ç
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ç
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
ç
ŒŒ M C> " G 4)i“Ye1 h Ò ]44556 Ê g repl
g file g filenamef system/repl/command.scmŒ
ð
ŒŒ ó ŒŒ ó #ŒŒ ó ŒŒ ó ŒŒ g
documentationf )disassemble-file FILE
Disassemble a file.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ð
ŒŒ >
C0‚“ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ð
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ð
ŒŒ , C> " G 4)i˜fgh53M0ijk h D ]:45 45 45 4 4 55 45 45 45 4 > " G 4˜ ›
›˜ ›
›˜ ›
›> " G C < g repl
‰ g form ‰ g gc-start ‰ g
real-start ‰ g run-start ‰ g result ' ‰ g run-end . ‰ g real-end 5 ‰ g gc-end < ‰ g filenamef system/repl/command.scmŒ
ú
ŒŒ ý ŒŒ ý ŒŒ
þ ŒŒ ý ŒŒ ÿ ŒŒ ý ŒŒ ŒŒ !ŒŒ ' ŒŒ ' ý ŒŒ * ŒŒ . ý ŒŒ 1 ŒŒ 5 ý ŒŒ 8 ŒŒ < ý ŒŒ ? ŒŒ S ŒŒ X ŒŒ ] ŒŒ _ ŒŒ ` ŒŒ h ŒŒ j ŒŒ k ŒŒ s ŒŒ u ŒŒ v ŒŒ ~ ŒŒ ‰ g
documentationf time EXP
Time execution.Œ C0‚˜ ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
ú
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
ú
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
ú
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ú
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ú
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ú
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
ú
ŒŒ M C> " G 4)i—Nl3 h Ü - 1 3 4 4 55@ Ô g repl
g form g opts g filenamef system/repl/command.scmŒ
ŒŒ ŒŒ 'ŒŒ ŒŒ ŒŒ
g
documentationf profile EXP
Profile execution.Œ C0‚— ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
ŒŒ M C> " G 4)i\^l3mn h( á - 1 3 4 4 5545 @ Ù g repl
& g form & g opts & g filenamef system/repl/command.scmŒ
ŒŒ ŒŒ 'ŒŒ ŒŒ ŒŒ & ŒŒ &
g
documentationf trace EXP
Trace execution.Œ C0‚\ ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
ŒŒ M C> " G 4 ,o-0qrstuvw0xžŸ ¢£¥¬±¶Ä§ÆÌ hh ì ]LLLŒŒLL ŒŒ Œ
Œ L LŒŒŒ
ŒŒŒ C ä g t-3ee4d7042b-8e0
b g t-3ee4d7042b-8e1 b g t-3ee4d7042b-8e2 b g t-3ee4d7042b-8e3 b g t-3ee4d7042b-8e6 b g t-3ee4d7042b-8e5 b g t-3ee4d7042b-8e4 b b C hx ž ]45454545454545 45 $ O @
6 – g name
u g repl u g args u g docstring u g body u g body* u g tmp D u g tmp O u g filenamef system/repl/command.scmŒ + ŒŒ + /ŒŒ + ŒŒ - ŒŒ - /ŒŒ - ŒŒ / ŒŒ / /ŒŒ / ŒŒ 1 ŒŒ $ 1 /ŒŒ & 1 ŒŒ ' 5 ŒŒ - 5 /ŒŒ / 5 ŒŒ 0 7 &ŒŒ 6 7 <ŒŒ 8 7 &ŒŒ 9 8 &ŒŒ ? 8 <ŒŒ A 8 &ŒŒ D & ŒŒ u C h( k ] 4 5 $ @ 6 c g x
" g tmp " g filenamef system/repl/command.scmŒ
# ŒŒ " C5oR4)i Ðn¡Ñ¨ÒmÎÓ²0É
hh º - / 0 3 # # 45 # 4 5 $ 45 4
56 6² g repl
h g count h g width h g full? h g debug 9 h g filenamef system/repl/command.scmŒ
<
ŒŒ # = .ŒŒ 3 <
ŒŒ a C ŒŒ f <
ŒŒ h g widthS Œg full?S Œ g
documentationf ºbacktrace [COUNT] [#:width W] [#:full? F]
Print a backtrace.
Print a backtrace of all stack frames, or innermost COUNT frames.
If COUNT is negative, the last COUNT frames will be shown.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
<
ŒŒ >
C0‚ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
<
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
<
ŒŒ , C> " G 4)i£¡Ô0Õ¹Ö¨×VØÙÚ²É h@ Z - . , 3 # 4 5 $ 45€ $ "
“ $ 645–4455•$ {454455™‘$ 644 54455™> " G
4545£ 45 45
‘$ 4
5" 644 545–> " G
4545£ 45 45
‘$ 4
5" 66R g repl
@ g count @ g debug @ g t , @ g filenamef system/repl/command.scmŒ
I
ŒŒ % P
ŒŒ , P ŒŒ , P ŒŒ = P ŒŒ D O ŒŒ I Q ŒŒ K Q ŒŒ U R ŒŒ V R ŒŒ b R ŒŒ f O ŒŒ n T ŒŒ z T ŒŒ { T ŒŒ S ŒŒ „ U ŒŒ † U ŒŒ ‡ W ŒŒ ‘ W ŒŒ W ŒŒ ¢ W ŒŒ Î Y 'ŒŒ Ó Y "ŒŒ á X ŒŒ â [ ŒŒ õ [ ŒŒ ú [ ŒŒ & ] %ŒŒ + ] ŒŒ 9 \ ŒŒ > I
ŒŒ ! @ g
documentationf ˆup [COUNT]
Select a calling stack frame.
Select and print stack frames that called this one.
An argument says how many frames up to go.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
I
ŒŒ >
C0‚£ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
I
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
I
ŒŒ , C> " G 4)i¥¡Ô0Û¹ÜVبÙÚ²É h - . , 3 # 4 5 $ à45€ $ "
“ $ 645˜
’$ Q45
‘$ 6445
> " G 4 545£
45 4 5644545˜> " G 4 545£
45 45
‘$ 4 5" 6
6 g repl
g count g debug g t , @ g filenamef system/repl/command.scmŒ
_
ŒŒ % f
ŒŒ , f ŒŒ , f ŒŒ = f ŒŒ D e ŒŒ I g ŒŒ K g ŒŒ U h ŒŒ W h ŒŒ [ e ŒŒ c j ŒŒ h i ŒŒ m k ŒŒ o k ŒŒ p m ŒŒ ¬ n ŒŒ p ŒŒ À p ŒŒ Å p ŒŒ ñ r %ŒŒ ö r ŒŒ q ŒŒ _
ŒŒ g
documentationf ‰down [COUNT]
Select a called stack frame.
Select and print stack frames called by this one.
An argument says how many frames down to go.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
_
ŒŒ >
C0‚¥ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
_
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
_
ŒŒ , C> " G 4)i)¡Ô0ÝÖ¨V¹ØÙÚ²ÞÉ h Û - . , 3 # 4 5 $ Î$ ‘45€ $ "
’ $ 64455’$ P445> " G 4545£
45 45
‘$ 4 5" 6
6 4545£
45 45
‘$ 4 5" 66 Ó g repl
ù g idx ù g debug ù g t 2 F g filenamef system/repl/command.scmŒ
t
ŒŒ * z ŒŒ + } ŒŒ 2 }
ŒŒ 2 } ŒŒ C } ŒŒ J | ŒŒ O ~ ŒŒ Q ~ ŒŒ T
ŒŒ ` ŒŒ d | ŒŒ e € ŒŒ ¡ ‚ 'ŒŒ ¦ ‚ "ŒŒ ´ ŒŒ ¹ „ ŒŒ » „ ŒŒ ß † *ŒŒ ä † %ŒŒ ò … ŒŒ ÷ t
ŒŒ ù g
documentationf lframe [IDX]
Show a frame.
Show the selected frame.
With an argument, select a frame by index, then show it.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
t
ŒŒ >
C0‚) ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
t
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
t
ŒŒ , C> " G 4)i©¡Mߨ¹0É h8 Ô ] 4 5 $ 44545£566 Ì g repl
2 g debug 2 g filenamef system/repl/command.scmŒ
ˆ
ŒŒ ‹ ŒŒ + ‹ ŒŒ 0 ˆ
ŒŒ 2 g
documentationf 5procedure
Print the procedure for the selected frame.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ˆ
ŒŒ >
C0‚© ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ˆ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ˆ
ŒŒ , C> " G 4)i¬án¡â¨¹m0É
hP - / 0 3 # 45 4 5 $ 4545£6 6 g repl
M g width M g debug ' M g filenamef system/repl/command.scmŒ
ŒŒ 0ŒŒ !
ŒŒ F ’ ŒŒ K
ŒŒ M
g widthS Πg
documentationf Qlocals
Show local variables.
Show locally-bound variables in the selected frame.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C0‚¬ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ŒŒ , C> " G 4)i®¡0ãäåÉ h@ 3 ] 4 5 $ $4455$ 45" 66 + g repl
< g debug < g filenamef system/repl/command.scmŒ
”
ŒŒ š
ŒŒ š ŒŒ & š ŒŒ 3 š 2ŒŒ 5 š ŒŒ : ”
ŒŒ < g
documentationf yerror-message
Show error message.
Display the message associated with the error that started the current
debugging REPL.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
”
ŒŒ >
C0‚® ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
”
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
”
ŒŒ , C> " G 4)i±53æç0èé¯ê
h@ ~ ]4 4 55 45$ 45 456 6v g repl
@ g form @ g proc @ g idx & 8 g filenamef system/repl/command.scmŒ
œ
ŒŒ ¡ ŒŒ ¡ ŒŒ ¡ ŒŒ ¡ ŒŒ ¢
ŒŒ ¢ ŒŒ ¤ ŒŒ & ¤ ŒŒ - ¥ ŒŒ 0 ¥ *ŒŒ 8 ¥
ŒŒ < £ ŒŒ @ £ ŒŒ @ g
documentationf abreak PROCEDURE
Break on calls to PROCEDURE.
Starts a recursive prompt when PROCEDURE is called.Œ C0‚± ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
œ
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
œ
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
œ
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
œ
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
œ
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
œ
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
œ
ŒŒ M C> " G 4)iµ ë0èé h8 â ]Š$ 45" 45 456 Ú g repl
3 g file 3 g line 3 g file 3 g idx ! 3 g filenamef system/repl/command.scmŒ
§
ŒŒ ŒŒ ŒŒ
!ŒŒ ŒŒ ® ŒŒ ! ® ŒŒ ( ¯ ŒŒ + ¯ &ŒŒ 3 ¯ ŒŒ 3 g
documentationf ×break-at-source FILE LINE
Break when control reaches the given source location.
Starts a recursive prompt when control reaches line LINE of file FILE.
Note that the given source location must be inside a procedure.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
§
ŒŒ >
C0‚µ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
§
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
§
ŒŒ , C> " G î,Žïð h ƒ ]L 44 556 { g frame
g filenamef system/repl/command.scmŒ
» ŒŒ ½ ŒŒ
¾ ŒŒ ½ ŒŒ ¼ ŒŒ C h [ ] O C S g k
g filenamef system/repl/command.scmŒ
· ŒŒ
C0ã,ñò
M h d ]L 6 \ g x
g filenamef system/repl/command.scmŒ
Æ ŒŒ
Æ 'ŒŒ
C4Aóôõö h S ]4> G 4L> " G 4 5 ( 4> " G " ,4> " G 4 L O > " G 4
4 5
54
L56 K g from
› g stack
› g vals 0 ~ g filenamef system/repl/command.scmŒ ¶ ŒŒ ´ ŒŒ À ŒŒ À ŒŒ ! À ŒŒ * Á ŒŒ 0 Á ŒŒ 8  ŒŒ 9 à ŒŒ > à ŒŒ C à ŒŒ P Å ŒŒ U Å ŒŒ Z Å ŒŒ c Æ ŒŒ Ç
ŒŒ ‚ Ç ŒŒ † Ç )ŒŒ ˆ Ç ŒŒ Š Ç >ŒŒ Œ Ç
ŒŒ È ŒŒ › Ç ŒŒ ›
C h0 È ] 45 U 4 O > XCXFG @ À g repl
. g msg . g handler . g args # . g filenamef system/repl/command.scmŒ
±
ŒŒ ´ ŒŒ . g nameg repl-pop-continuation-resumerŒ C÷R4)iÅ¡÷0ø¨¹ù<ãÉ h` \ ]4 5 $ G4 44545£55 44545£> " G 6
6 T g repl
_ g debug _ g handler / X g filenamef system/repl/command.scmŒ
Ê
ŒŒ Ï ŒŒ Ð ŒŒ Ð "ŒŒ - Ð ŒŒ / Ï ŒŒ / Ï ŒŒ 2 Ñ ŒŒ V Ò ŒŒ X Ò ŒŒ ] Ê
ŒŒ _ g
documentationf ifinish
Run until the current frame finishes.
Resume execution, breaking when the current frame finishes.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
Ê
ŒŒ >
C0‚Å ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
Ê
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
Ê
ŒŒ , C> " G î,Žï h q ]L 4 56 i g frame
g filenamef system/repl/command.scmŒ
Ü ŒŒ Ý ŒŒ
Ý ŒŒ
C h [ ] O C S g k
g filenamef system/repl/command.scmŒ
Ø ŒŒ
C0ã4Aóôõö h@ Ì ]45 4L > " G 4455 4
L 56 Ä g stack
= g filenamef system/repl/command.scmŒ × ŒŒ × ŒŒ Þ ŒŒ Þ ŒŒ Þ ŒŒ ! ß ŒŒ $ ß ŒŒ ( ß 'ŒŒ * ß ŒŒ , ß <ŒŒ . ß ŒŒ 1 à ŒŒ = ß ŒŒ =
C h0 © ] 45 U 4 O > XCXFG @ ¡ g msg
, g handler , g args ! , g filenamef system/repl/command.scmŒ
Ô
ŒŒ × ŒŒ , g nameg repl-next-resumerŒ CúR4)i¹¡0û¨¹üúýþ<ãÉ
hh d ]4 5 $ K44545£5 44545£45 > " G
6 6 \ g repl
c g debug c g msg ( \ g filenamef system/repl/command.scmŒ
â
ŒŒ ç
ŒŒ ç ŒŒ ( ç
ŒŒ ( ç ŒŒ + è ŒŒ = è &ŒŒ N è ŒŒ Z ê ŒŒ \ ê ŒŒ a â
ŒŒ c g
documentationf ustep
Step until control reaches a different source location.
Step until control reaches a different source location.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
â
ŒŒ >
C0‚¹ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
â
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
â
ŒŒ , C> " G 4)i¼¡0û¨¹üúýþ<ãÉ
hh k ]4 5 $ K44545£5 44545£45 > " G
6 6 c g repl
c g debug c g msg ( \ g filenamef system/repl/command.scmŒ
ì
ŒŒ ñ
ŒŒ ñ ŒŒ ( ñ
ŒŒ ( ñ ŒŒ + ò ŒŒ = ò &ŒŒ N ò ŒŒ Z ô ŒŒ \ ô ŒŒ a ì
ŒŒ c g
documentationf |step-instruction
Step until control reaches a different instruction.
Step until control reaches a different VM instruction.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ì
ŒŒ >
C0‚¼ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ì
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ì
ŒŒ , C> " G 4)i¿¡0û¨¹üúýþ<ãÉ
hh Ž ]4 5 $ K44545£5 44545£45 > " G
6 6 † g repl
c g debug c g msg ( \ g filenamef system/repl/command.scmŒ
ö
ŒŒ û
ŒŒ û ŒŒ ( û
ŒŒ ( û ŒŒ + ü ŒŒ = ü &ŒŒ N ü ŒŒ Z þ ŒŒ \ þ ŒŒ a ö
ŒŒ c g
documentationf Ÿnext
Step until control reaches a different source location in the current frame.
Step until control reaches a different source location in the current frame.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ö
ŒŒ >
C0‚¿ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ö
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ö
ŒŒ , C> " G 4)i¡0û¨¹üúýþ<ãÉ
hh • ]4 5 $ K44545£5 44545£45 > " G
6 6 g repl
c g debug c g msg ( \ g filenamef system/repl/command.scmŒ
ŒŒ
ŒŒ ŒŒ (
ŒŒ ( ŒŒ + ŒŒ = &ŒŒ N ŒŒ Z ŒŒ \ ŒŒ a
ŒŒ c g
documentationf ¦next-instruction
Step until control reaches a different instruction in the current frame.
Step until control reaches a different VM instruction in the current frame.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C0‚ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ŒŒ , C> " G 4)iÇ53æÿ0èé¯ê
h@ Ê ]4 4 55 45$ 45 456 6Â g repl
@ g form @ g proc @ g idx & 8 g filenamef system/repl/command.scmŒ
ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ
ŒŒ ŒŒ ŒŒ & ŒŒ - ŒŒ 0 *ŒŒ 8
ŒŒ < ŒŒ @ ŒŒ @ g
documentationf tracepoint PROCEDURE
Add a tracepoint to PROCEDURE.
A tracepoint will print out the procedure and its arguments, when it is
called, and its return value(s) when it returns.Œ C0‚Ç ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
ŒŒ M C> " G 4)iÊ 0
0é h( œ ] 4 54 5$ " 6 ” g idx
% g filenamef system/repl/command.scmŒ
ŒŒ ŒŒ
ŒŒ ! ŒŒ ! ŒŒ ! 4ŒŒ # ! 7ŒŒ % ŒŒ % C h 3 ] 45 ( 66 + g repl
g traps g filenamef system/repl/command.scmŒ
ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ ŒŒ g
documentationf xtraps
Show the set of currently attached traps.
Show the set of currently attached traps (breakpoints and tracepoints).Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
ŒŒ >
C0‚Ê ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
ŒŒ , C> " G 4)iÌÔ¯ h Ú ]45$ 66 Ò g repl
g idx g filenamef system/repl/command.scmŒ
$
ŒŒ ) ŒŒ
) ŒŒ + ŒŒ *
ŒŒ * ŒŒ g
documentationf )delete IDX
Delete a trap.
Delete a trap.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
$
ŒŒ >
C0‚Ì ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
$
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
$
ŒŒ , C> " G 4)iÏÔ¯ h Ý ]45$ 66 Õ g repl
g idx g filenamef system/repl/command.scmŒ
-
ŒŒ 2 ŒŒ
2 ŒŒ 4 ŒŒ 3
ŒŒ 3 ŒŒ g
documentationf ,disable IDX
Disable a trap.
Disable a trap.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
-
ŒŒ >
C0‚Ï ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
-
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
-
ŒŒ , C> " G 4)iÑÔ¯ h Ú ]45$ 66 Ò g repl
g idx g filenamef system/repl/command.scmŒ
6
ŒŒ ; ŒŒ
; ŒŒ = ŒŒ <
ŒŒ < ŒŒ g
documentationf )enable IDX
Enable a trap.
Enable a trap.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
6
ŒŒ >
C0‚Ñ ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
6
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
6
ŒŒ , C> " G 4)iÓ¡ ¨¹0É h0 Û ] 4 5 $ 4545£66 Ó g repl
+ g debug + g filenamef system/repl/command.scmŒ
?
ŒŒ $ D ŒŒ ) ?
ŒŒ + g
documentationf Eregisters
Print registers.
Print the registers of the current frame.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
?
ŒŒ >
C0‚Ó ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
?
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
?
ŒŒ , C> " G 4)i
n0 h8 - . , 3 # 4> " G 45 6 g repl
3 g x 3 g filenamef system/repl/command.scmŒ
F
ŒŒ L ŒŒ , M
ŒŒ - M 1ŒŒ 3 M ŒŒ 3 g
documentationf pwidth [X]
Set debug output width.
Set the number of screen columns in the output from `backtrace' and
`locals'.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
F
ŒŒ >
C0‚
ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
F
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
F
ŒŒ , C> " G 4)iHl3
J h( ]
44 4 55> G 6 ù g repl
& g form & g args & g filenamef system/repl/command.scmŒ
U
ŒŒ X ŒŒ X ŒŒ X 2ŒŒ X ŒŒ X ŒŒ & Z ŒŒ & g
documentationf 4inspect EXP
Inspect the result(s) of evaluating EXP.Œ C0‚H ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
U
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
U
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
U
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
U
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
U
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
U
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
U
ŒŒ M C> " G 4)iBl3
\]D h m ]4 > " G 6 e g x
g filenamef system/repl/command.scmŒ
b ŒŒ c ŒŒ d ŒŒ C h( ]
44 4 55> G 6 g repl
& g form & g args & g filenamef system/repl/command.scmŒ
\
ŒŒ _ ŒŒ _ ŒŒ _ 2ŒŒ _ ŒŒ _ ŒŒ & a ŒŒ & g
documentationf >pretty-print EXP
Pretty-print the result(s) of evaluating EXP.Œ C0‚B ŒŽ hà ]3ˆ$ ·Ž ˆ$ Ž ˆ$ KŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 g form-name
ß g key ß g args ß g vx ¼ g vy ¼ g vx — g vy — g vx 1 r g vy 1 r g filenamef system/repl/command.scmŒ
\
ŒŒ ß g nameg handle-read-errorŒ C,š¡Z§© h0 ^ - . , 3 # 45 44L 55 45 6 V g port
. g filenamef system/repl/command.scmŒ
\
ŒŒ .
C h J ] L O 6 B g filenamef system/repl/command.scmŒ
\
ŒŒ
C6 h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
\
ŒŒ
C(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
\
ŒŒ >
C h m - 1 3 L 6 e g k
g args g filenamef system/repl/command.scmŒ
\
ŒŒ
C hP œ ] 45 U 64 O O 5 4 4O 5> XCXFG C ” g repl
M g handle-read-error M g form $ B g k F M g filenamef system/repl/command.scmŒ
\
ŒŒ M C> " G 4)iÛÛ h ’ ]6 Š g repl
g filenamef system/repl/command.scmŒ
l
ŒŒ o ŒŒ g
documentationf gc
Garbage collection.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
l
ŒŒ >
C0‚Û ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
l
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
l
ŒŒ , C> " G 4)iÝ
!"#$%&'()*+,-.V & h€ ; ]a45 45 4 54 5 4545 4 > " G 4
> " G 4 54 5 4
> " G 4˜> " G 4
> " G 4545 4
> " G 4> " G 4
> " G 4545 4
> " G 4> " G 4
> " G 4 54 54 54 54 54 54 54 5
4
> " G 4!> " G 4"> " G 4#
> " G 4$ > " G 4
> " G
44%5 > " G 4%5 6 3 g repl
| g this-tms | g this-gcs | g last-tms | g last-gcs | g
this-times 4 g g
last-times 4 g g this-heap y Å g this-free y Å g
this-alloc × g
last-alloc × g
this-total 2 x g
last-total 2 x g
this-utime ° V g
last-utime ° V g
this-stime ° V g
last-stime ° V g this-cutime ° V g last-cutime
° V g this-cstime ° V g last-cstime ° V g filenamef system/repl/command.scmŒ
q
ŒŒ t ŒŒ u ŒŒ
v ŒŒ w ŒŒ t ŒŒ # y ŒŒ ) y *ŒŒ + y ŒŒ , z ŒŒ 2 z *ŒŒ 4 z ŒŒ 4 y ŒŒ 9 { ŒŒ = { ŒŒ D { >ŒŒ I { ŒŒ R | ŒŒ h ~ ŒŒ n ~ )ŒŒ p ~ ŒŒ q ŒŒ w *ŒŒ y ŒŒ y ~ ŒŒ ~ € ŒŒ ‚ € ŒŒ „ € )ŒŒ † € 3ŒŒ ‹ € ŒŒ ” ŒŒ ˜ ŒŒ ž ŒŒ ¢ @ŒŒ § ŒŒ ° ‚ ŒŒ Æ „ ŒŒ Ì „ )ŒŒ Î „ ŒŒ Ï … ŒŒ Õ … )ŒŒ × … ŒŒ × „ ŒŒ Ü † ŒŒ à † ŒŒ â † -ŒŒ ä † 4ŒŒ é † ŒŒ ò ‡ ŒŒ ö ‡ ŒŒ ý ‡ >ŒŒ ‡ ŒŒ ˆ ŒŒ ! Š ŒŒ ' Š )ŒŒ ) Š ŒŒ * ‹ ŒŒ 0 ‹ )ŒŒ 2 ‹ ŒŒ 2 Š ŒŒ 7 Œ ŒŒ ; Œ ŒŒ = Œ +ŒŒ ? Œ 2ŒŒ D Œ ŒŒ M ŒŒ Q ŒŒ Z ŒŒ c Ž ŒŒ y ŒŒ € ‘ ŒŒ ‡ ’ ŒŒ Ž “ ŒŒ • ” ŒŒ œ • ŒŒ £ – ŒŒ ª — ŒŒ ° ŒŒ Á ˜ ŒŒ Å ˜ ŒŒ Ç ˜ 0ŒŒ É ˜ 7ŒŒ Î ˜ ŒŒ × ™ ŒŒ Û ™ ŒŒ ä ™ ŒŒ í š ŒŒ ñ š ŒŒ ú š ŒŒ › ŒŒ › ŒŒ › ŒŒ œ ŒŒ œ ŒŒ & œ ŒŒ / ŒŒ W ŒŒ | ¡ ŒŒ c | g
documentationf statistics
Display statistics.Œ C,(¶¸ ÌÏ h@ | ]445 5 " %4 5 45$ 6Œ "ÿÿÛ "ÿÿÔ t g port
> g out 7 g x 7 g filenamef system/repl/command.scmŒ
q
ŒŒ >
C0‚Ý ŒŽ hè Ô - 1 3 ˆ$ ´Ž ˆ$ Ž ˆ$ JŽ 4 > " G 445 > " G " 4 > " G " 4 > " G " 4 > " G 6 Ì g k
â g args â g vx À g vy À g vx ' œ g vy ' œ g vx 8 x g vy 8 x g filenamef system/repl/command.scmŒ
q
ŒŒ â
C h0 k ] 45 U 4 45> XCXFG C c g repl
, g k % , g filenamef system/repl/command.scmŒ
q
ŒŒ , C> " G 0/0 h0 ]
4$ " 5 6 g title
) g flag ) g field1 ) g field2 ) g unit ) g fmt ) g filenamef system/repl/command.scmŒ
£
ŒŒ ¤
ŒŒ ¤ ŒŒ ¤ 8ŒŒ ¤ AŒŒ ¤ DŒŒ ¤
ŒŒ ¤ ŒŒ ) ¥ ŒŒ
) g nameg display-statŒ CR h · ] 6 ¯ g title
g field1 g field2 g filenamef system/repl/command.scmŒ
§
ŒŒ
¨ 'ŒŒ ¨ ŒŒ g nameg display-stat-titleŒ CR h Ö ] ˜6 Î g title
g flag g this g last g unit g filenamef system/repl/command.scmŒ
ª
ŒŒ
« ŒŒ « ŒŒ g nameg display-diff-statŒ CR012k3 h@ 8 ] ˜ 44›55 44›556 0 g title
9 g this 9 g last 9 g num # g filenamef system/repl/command.scmŒ
ŒŒ ° ŒŒ ° ŒŒ ¯ ŒŒ ¯ ŒŒ ¯ ŒŒ ¯ (ŒŒ ¯ ŒŒ ¯ ŒŒ ) ¯ ŒŒ * ¯ ŒŒ 1 ¯ (ŒŒ 3 ¯ ŒŒ 5 ¯ ŒŒ 7 ° :ŒŒ 9 ° ŒŒ 9 g nameg display-time-statŒ C%R40156 h` Î ] ˜˜
‘$ " 4››5
‘$ " 4››56 Æ g title
[ g this-time [ g
this-clock [ g last-time [ g
last-clock [ g time 9 g clock 9 g filenamef system/repl/command.scmŒ
²
ŒŒ ¶ ŒŒ ¶ .ŒŒ ¶ ŒŒ ´ ŒŒ ´ ŒŒ ´ ŒŒ $ ´ ŒŒ ) ´ %ŒŒ . ´ .ŒŒ 0 ´ <ŒŒ 1 ´ .ŒŒ 3 ´ ŒŒ = ´ ŒŒ A ´ ŒŒ C ´ ŒŒ H ´ ŒŒ M ´ %ŒŒ R ´ .ŒŒ T ´ <ŒŒ U ´ .ŒŒ W ´ ŒŒ Y · ,ŒŒ [ µ ŒŒ [ g nameg display-mips-statŒ C7RC ; g m
0 g filenamef system/repl/command.scmŒ
ŒŒ 2 3 ŒŒ 5 2
ŒŒ 7 H ŒŒ : G
ŒŒ Ë J
ŒŒ _ K
ŒŒ ` M ŒŒ i M
ŒŒ ý N
ŒŒ O
ŒŒ = P
ŒŒ ê Q
ŒŒ • R
ŒŒ L T
ŒŒ ê W
ŒŒ ’ Z
ŒŒ o ]
ŒŒ » a
ŒŒ a h
ŒŒ / k
ŒŒ
H s
ŒŒ O |
ŒŒ
ŒŒ › “
ŒŒ ¡
ŒŒ ª ¤
ŒŒ ² ±
ŒŒ !° ú
ŒŒ .q %
ŒŒ 5™ >
ŒŒ : D
ŒŒ >Q J
ŒŒ B© P
ŒŒ G U
ŒŒ O `
ŒŒ U¡ p
ŒŒ Yá z
ŒŒ _Y ƒ
ŒŒ e9
ŒŒ i± •
ŒŒ o) ž
ŒŒ t ¤
ŒŒ |A »
ŒŒ i Ê
ŒŒ ‰ Ñ
ŒŒ Ö
ŒŒ • Ý
ŒŒ n ä
ŒŒ o ç
ŒŒ ¥b ð
ŒŒ ©á ú
ŒŒ ³2
ŒŒ º’
ŒŒ Æ’ <
ŒŒ Ìi I
ŒŒ Ó¹ _
ŒŒ Ú‘ t
ŒŒ á) ˆ
ŒŒ åá
ŒŒ êù ”
ŒŒ ð œ
ŒŒ øJ §
ŒŒ ì ±
ŒŒ í Ê
ŒŒ Ô
ŒŒ Ž â
ŒŒ ì
ŒŒ ™ ö
ŒŒ A
ŒŒ !ñ
ŒŒ *r
ŒŒ 0I $
ŒŒ 4á -
ŒŒ 9 6
ŒŒ > ?
ŒŒ BÉ F
ŒŒ G± U
ŒŒ OJ \
ŒŒ W’ l
ŒŒ [Á q
ŒŒ iè £
ŒŒ jË §
ŒŒ kÒ ª
ŒŒ ml
ŒŒ o ²
ŒŒ W oÄ
C6 PK ! ©'Çfã, ã, repl.gonu „[µü¤ GOOF----LE-8-2.0Ë, ] · 4 h" ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ ¤ g filenameS¤
f system/repl/repl.scm¤ g importsS¤ g base¤
g syntax¤
¤ ¤ g pmatch¤ ¤ ¤ g compile¤ ¤ ¤ g language¤ ¤ ¤ g vm¤ ¤ ¤ g error-handling¤ ¤ ¤ g common¤ ¤ ! ¤ "g command¤ #" ¤ $# ¤ %g ice-9¤ &g control¤ '%& ¤ (' ¤ ) !$( ¤ *g exportsS¤ +g
start-repl¤ ,g run-repl¤ -+, ¤ .g set-current-module¤ /. ¤ 0. ¤ 1g read-char¤ 2g eof-object?¤ 3g read-scheme-line-comment¤ 4g read¤ 5g read-scheme-datum-comment¤ 6g
language-name¤ 7g scheme¤ 8g peek-char¤ 9g unread-char¤ :g read-comment¤ ;g meta¤ g with-input-from-port¤ ?g flush-leading-whitespace¤ @g language-reader¤ Ag meta-reader¤ Bg char-ready?¤ Cg flush-all-input¤ Dg catch¤ Eg repl-reader¤ Fg repl-prompt¤ Gg
repl-language¤ Hg current-module¤ Ig quit¤ Jg throw¤ Kg format¤ Lg current-output-port¤ Mf While reading expression:
¤ Ng print-exception¤ Og prompting-meta-read¤ Pg debugS¤ QP Œ¤ RQ ¤ Sg current-language¤ Tg start-repl*¤ Ug
parameter?¤ VU ¤ WU ¤ Xg scm-error¤ Yg wrong-type-arg¤ Zf parameterize¤ [f Not a parameter: ~S¤ \g run-repl*¤ ]g make-repl¤ ^g make-syntax-transformer¤ _^ ¤ `^ ¤ ag abort-on-error¤ bg macro¤ cg $sc-dispatch¤ dc ¤ ec ¤ fg any¤ gfff ¤ hg
syntax-object¤ ig top¤ ji ¤ kg ribcage¤ lg dummy¤ mg string¤ ng exp¤ olmn ¤ pg m-1e9e6487f-43¤ qpi ¤ rqjj ¤ sf l-1e9e6487f-48¤ tf l-1e9e6487f-49¤ uf l-1e9e6487f-4a¤ vstu ¤ wkorv ¤ xk ¤ yg x¤ zy ¤ {q ¤ |f l-1e9e6487f-45¤ }| ¤ ~kz{} ¤ jwx~ ¤ €g hygiene¤ € ¤ ‚hD ¤ ƒh ¤ „g lambda¤ …h„ ¤ †g key¤ ‡h† ¤ ˆg args¤ ‰hˆ ¤ Š‡‰Œ¤ ‹hK ¤ Œf While ~A:~%¤ hŒ ¤ ŽhN ¤ hL ¤ ¤ ‘h ¤ ’Ž‘‡‰ ¤ “g abort¤ ”h“ ¤ •” ¤ –’• ¤ —g syntax-violation¤ ˜— ¤ ™— ¤ šf -source expression failed to match any pattern¤ ›g default-prompt-tag¤ œg %start-stack¤ œ ¤ žœ ¤ Ÿ'› ¤ '› ¤ ¡g *repl-stack*¤ ¢g repl-welcome¤ £g meta-command¤ ¤f While executing meta-command:~%¤ ¥g newline¤ ¦g flush-to-newline¤ §g call-with-error-handling¤ ¨g repl-prepare-eval-thunk¤ ©g
repl-parse¤ ªf parsing expression¤ «f compiling expression¤ ¬g run-hook¤ g before-eval-hook¤ ®g on-errorS¤ ¯g repl-option-ref¤ °g on-error¤ ±g for-each¤ ²g
repl-print¤ ³g trap-handlerS¤ ´g disabled¤ µg char-whitespace?¤ ¶g char=?¤C 5 hè á ]4
)*-5 40 > " G 12 h8 ì ]" *4 5 45 $ C
†$ C"ÿÿÖ"ÿÿÒ ä g port
4 g ch
0 g t 0 g filenamef system/repl/repl.scmŒ
)
ŒŒ * ŒŒ + ŒŒ
+ ŒŒ ,
ŒŒ , ŒŒ & -
ŒŒ * , ŒŒ + -
ŒŒ 0 .
ŒŒ 0 * ŒŒ 4 g nameg read-scheme-line-commentŒ C3R4 h ‡ ] 6 g port
g filenamef system/repl/repl.scmŒ
0
ŒŒ 1 ŒŒ g nameg read-scheme-datum-commentŒ C5R6713859 h° ] 4 5& š;†$ &4> " G 4> " G C#†$ `4> " G 45 ;†$ &4> " G 4> " G C4#> " G CCC g lang
« g port « g ch « g key ` § g filenamef system/repl/repl.scmŒ
4
ŒŒ 5 ŒŒ 5 !ŒŒ 5 ŒŒ 6 ŒŒ 8
ŒŒ + 9
ŒŒ G 6 ŒŒ H <
ŒŒ Z = ŒŒ ` =
ŒŒ l ?
ŒŒ ~ @
ŒŒ ’ G
ŒŒ « g nameg read-commentŒ C:R;"Œ?21<:@ hX ¸ ]45 4 5$ 6 ,†$ 4> " G C4LL 5$ C4L5LL 6 ° g ch
R g filenamef system/repl/repl.scmŒ
W ŒŒ X ŒŒ X ŒŒ
Y ŒŒ Y
ŒŒ Z ŒŒ [ ŒŒ ! Y
ŒŒ " \ ŒŒ 5 ^ ŒŒ C Y
ŒŒ F ` ŒŒ R ` ŒŒ R
C h0 k - . , 3 # 45 L L O 6 c g port
* g filenamef system/repl/repl.scmŒ
U ŒŒ U ŒŒ * V ŒŒ *
C h ‚ ] O C z g lang
g env g filenamef system/repl/repl.scmŒ
T
ŒŒ g nameg meta-readerŒ CARB281C h8 ¢ ] 45 $ $445 5$ C4> " G 6 C š g filenamef system/repl/repl.scmŒ
b
ŒŒ c ŒŒ c ŒŒ d ŒŒ d ŒŒ d ŒŒ c ŒŒ f ŒŒ / g ŒŒ
1
g nameg flush-all-inputŒ CCRDEF h O ] L 6G g filenamef system/repl/repl.scmŒ
s ŒŒ s ŒŒ
CAGH h o ] L O 44L 545 56 g g filenamef system/repl/repl.scmŒ
r ŒŒ t ŒŒ t ŒŒ t 5ŒŒ t ŒŒ s ŒŒ
CIJKLMNC h` ¼ - 1 3 †$ @445 > " G 445 > " G 4> " G C ´ g key
] g args ] g filenamef system/repl/repl.scmŒ
u ŒŒ v ŒŒ x ŒŒ z ŒŒ z ŒŒ $ z 'ŒŒ ) z ŒŒ 2 { ŒŒ 5 { ŒŒ C { ŒŒ L | ŒŒ ]
C h ] O 6y g repl
g filenamef system/repl/repl.scmŒ
p
ŒŒ q ŒŒ g nameg prompting-meta-readŒ CORRSTO h8 § - / 0 3 # 45 # 6 Ÿ g lang
3 g debug 3 g filenamef system/repl/repl.scmŒ
…
ŒŒ … &ŒŒ 3 † ŒŒ 3
g debugS Πg nameg
start-replŒ C+RSWXYZ[\] hX æ ] 45$ " 4 > " G ©4 © 5Y44 5> ZCZFÞ g lang
X g debug X g prompting-meta-read X g t-1e9e6487f-3e X g filenamef system/repl/repl.scmŒ
‰
ŒŒ Œ ŒŒ B ŒŒ E ŒŒ T ŒŒ X g nameg start-repl*Œ CTR4`abeg‚ƒ…Š‹– h( R ] ŒŒŒ C J g dummy
& g string & g exp & & C™š h( © ] 4 5 $ @ 6 ¡ g x
" g tmp " g filenamef system/repl/repl.scmŒ
ŒŒ " g
macro-typeg syntax-rulesŒg patternsg stringg exp C5aR\O h x ] 6 p g repl
g filenamef system/repl/repl.scmŒ
˜
ŒŒ
™ ŒŒ
g nameg run-replŒ C,R›ž h Q ] L 6 I g filenamef system/repl/repl.scmŒ
ž !ŒŒ ž 1ŒŒ
C h I ] L O 6 A g filenamef system/repl/repl.scmŒ ž !ŒŒ
C h Q ] LL 6I g filenamef system/repl/repl.scmŒ
/ŒŒ :ŒŒ
C h8 ¹ ]45 U 4 O > XCXFG O "ÿÿÏ ± g thunk
3 g k 3 g proc 3 g filenamef system/repl/repl.scmŒ
œ ŒŒ ŒŒ ŒŒ 3 ŒŒ 3 g nameg with-stack-and-promptŒ C ¡¢<D£ h Q ] L 6I g filenamef system/repl/repl.scmŒ
¬ ŒŒ ŒŒ
CI“K¤NL h8 ³ - 1 3 & 64> " G 45 6« g k
8 g args 8 g filenamef system/repl/repl.scmŒ
® ŒŒ
¯ ŒŒ ¯ ŒŒ ° ŒŒ ² ŒŒ ² "ŒŒ " ² ŒŒ - ³ (ŒŒ 8 ³ ŒŒ
8
C2¥“¦§DI D¨D© h Q ] LL 6 I g filenamef system/repl/repl.scmŒ
Å 'ŒŒ
Æ )ŒŒ
CKŒªNL“ h@ - 1 3 4> " G 445 > " G 6 w g key
< g args < g filenamef system/repl/repl.scmŒ
Å 'ŒŒ Å 7ŒŒ Å 'ŒŒ <
C h Z ] L4L LO 56 R g filenamef system/repl/repl.scmŒ
 $ŒŒ Å 'ŒŒ à &ŒŒ
CKŒ«NL“ h@ ˆ - 1 3 4> " G 445 > " G 6 € g key
< g args < g filenamef system/repl/repl.scmŒ
 $ŒŒ Å 'ŒŒ  4ŒŒ  $ŒŒ <
C¬§h Q ] LL 6I g filenamef system/repl/repl.scmŒ
É ŒŒ Ê "ŒŒ
C®¯°±² h a ]L 6 Y g v
g filenamef system/repl/repl.scmŒ
Î "ŒŒ
Ï $ŒŒ
C hx í ]45 U I4LLO 5 4L> " G 4 L O 4
L 5> X" G
" G
LO 6 å g thunk
O g k
U _ g l
` r g filenamef system/repl/repl.scmŒ
¾ ŒŒ Á ŒŒ
 $ŒŒ Á ŒŒ Ç ŒŒ 4 È ŒŒ B Ë +ŒŒ H Ë AŒŒ J Ë +ŒŒ O È ŒŒ X Á ŒŒ _ Ì )ŒŒ c ¿ ŒŒ r Î ŒŒ r
C“ h t - 1 3 6 l g k
g args g filenamef system/repl/repl.scmŒ
Ñ ŒŒ Ò ŒŒ
C h Z ] L LLO 6 R g filenamef system/repl/repl.scmŒ
¼ ŒŒ ½ ŒŒ ½ ŒŒ
C®¯°³´ h( ]O Q 45 U [ $ " ŒY[Ž( 4 > " G " " ¹4 5 †$ " & 4 O > " G " j4 5$ %4
> " G 4 > " G " :4 > " G 4
O 4 5> " G 4 > " G "ÿÿG"ÿÿC Z" XCXFG C g repl
( g prompting-meta-read ( g with-stack-and-prompt
( g t 2 g exp ^ g k ( g status ( g filenamef system/repl/repl.scmŒ
›
ŒŒ ¢ ŒŒ £ ŒŒ / £ <ŒŒ 3 £ ŒŒ 9 ¤ ŒŒ = ¤ ŒŒ > ¥ ŒŒ W ¦ ŒŒ X § ŒŒ ^ § ŒŒ d ©
ŒŒ h ¨ ŒŒ u «
ŒŒ “ ´
ŒŒ ¨ ŒŒ ž µ
ŒŒ ® ¶
ŒŒ ± ¶ ŒŒ ¶ ¶
ŒŒ à º
ŒŒ Ó »
ŒŒ ã Ó ŒŒ é Ó /ŒŒ ë Ó ŒŒ ï Ô ŒŒ ô »
ŒŒ ý Õ ŒŒ Ö ŒŒ ¦ ŒŒ ! ¢ ŒŒ ( g nameg run-repl*Œ C\R82µ1? h@ Å ]45 4 5$ C4 5$ 4> " G 6 C ½ g ch
9 g filenamef system/repl/repl.scmŒ
Û
ŒŒ Ü ŒŒ Ü ŒŒ
Ý ŒŒ Ý ŒŒ Þ ŒŒ " Ý ŒŒ # Þ !ŒŒ 6 Þ -ŒŒ
9
g nameg flush-leading-whitespaceŒ C?RB82µ1¶¦ hX á ]45 $ G45 4 5$ " 4 5$ #4> " G 4
5$ C6 CC Ù g ch
R g filenamef system/repl/repl.scmŒ
á
ŒŒ â ŒŒ â ŒŒ ã ŒŒ ã ŒŒ ä ŒŒ ä ŒŒ # ä (ŒŒ - ä ŒŒ . æ ŒŒ > ç ŒŒ J ç ŒŒ P è ŒŒ T
g nameg flush-to-newlineŒ C¦RC Ù g m
, g filenamef system/repl/repl.scmŒ
ŒŒ g )
ŒŒ
0
ŒŒ î 4
ŒŒ ð R !ŒŒ ò R 'ŒŒ ó R ŒŒ ö R
ŒŒ u T
ŒŒ m b
ŒŒ
d p
ŒŒ b …
ŒŒ Á ‰
ŒŒ ë ˜
ŒŒ b ›
ŒŒ ˆ Û
ŒŒ ä á
ŒŒ æ
C6 PK ! <5§^7 7 common.gonu „[µü¤ GOOF----LE-8-2.07 ] ª 4 h| ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g common¤ ¤
g filenameS¤ f system/repl/common.scm¤ g importsS¤
g base¤ g syntax¤
¤ ¤ g compile¤
¤ ¤ g language¤
¤ ¤ g message¤
¤ ¤ g vm¤ g program¤ ¤ ¤ g ice-9¤ g control¤ ¤ ! ¤ "g history¤ # " ¤ $# ¤ % !$ ¤ &g exportsS¤ 'g ¤ (g make-repl¤ )g
repl-language¤ *g repl-options¤ +g
repl-tm-stats¤ ,g
repl-gc-stats¤ -g
repl-debug¤ .g repl-welcome¤ /g repl-prompt¤ 0g repl-read¤ 1g repl-compile¤ 2g repl-prepare-eval-thunk¤ 3g repl-eval¤ 4g repl-expand¤ 5g
repl-optimize¤ 6g
repl-parse¤ 7g
repl-print¤ 8g repl-option-ref¤ 9g repl-option-set!¤ :g repl-default-option-set!¤ ;g repl-default-prompt-set!¤ string¤ >g
user-error¤ ?g
*warranty*¤ @g *copying*¤ Ag *version*¤ B'()*+,-./0123456789:;<=>?@A ¤ Cg autoloadsS¤ Dg tree-il¤ Eg optimize¤ FDE ¤ Gg optimize!¤ HG ¤ IFH ¤ Jg set-current-module¤ KJ ¤ LJ ¤ Mg format¤ Nf GNU Guile ~A
Copyright (C) 1995-2016 Free Software Foundation, Inc.
Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.¤ Og version¤ Pf qGuile is free software: you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation, either version 3 of
the License, or (at your option) any later version.
Guile is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with this program. If not, see
.¤ Qf 8Guile is distributed WITHOUT ANY WARRANTY. The following
sections from the GNU General Public License, version 3, should
make that clear.
15. Disclaimer of Warranty.
THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
16. Limitation of Liability.
IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
SUCH DAMAGES.
17. Interpretation of Sections 15 and 16.
If the disclaimer of warranty and limitation of liability provided
above cannot be given local legal effect according to their terms,
reviewing courts shall apply local law that most closely approximates
an absolute waiver of all civil liability in connection with the
Program, unless a warranty or assumption of liability accompanies a
copy of the Program in return for a fee.
See , for more details.¤ Rg make-record-type¤ Sf ¤ Tg options¤ Ug tm-stats¤ Vg gc-stats¤ Wg debug¤ XTUVW ¤ Yg record-constructor¤ Zg %compute-initargs¤ [g record-predicate¤ \g repl?¤ ]g make-procedure-with-setter¤ ^g record-accessor¤ _g record-modifier¤ `g copy-tree¤ ag compile-options¤ bg %auto-compilation-options¤ c ¤ dg trace¤ ed ¤ fg interp¤ gf ¤ hg prompt¤ ig string?¤ jg thunk?¤ kg
procedure?¤ lg error¤ mf Invalid prompt¤ ng print¤ of Invalid print procedure¤ pg
value-history¤ qg value-history-enabled?¤ rg enable-value-history!¤ sg disable-value-history!¤ tg ->bool¤ ug on-error¤ vg backtrace¤ wg report¤ xg pass¤ yf )Bad on-error value ~a; expected one of ~a¤ zWvwx ¤ {g repl-default-options¤ |g
%make-repl¤ }g languageS¤ ~g language?¤ g lookup-language¤ €g optionsS¤ g tm-statsS¤ ‚g times¤ ƒg gc-statsS¤ „g debugS¤ …g display¤ †g newline¤ ‡f Enter `,help' for help.
¤ ˆf ~A@~A~A> ¤ ‰g
language-name¤ Šg module-name¤ ‹g current-module¤ Œg length¤ g *repl-stack*¤ Žf ¤ f [~a]¤ g language-reader¤ ‘g current-input-port¤ ’g repl-compile-options¤ “g fromS¤ ”g toS¤ •g objcode¤ –g optsS¤ —g envS¤ ˜g decompile¤ ™g language-parser¤ šg language-evaluator¤ ›g make-program¤ œg language-compilers¤ g default-prompt-handler¤ ž ¤ Ÿ ¤ g default-prompt-tag¤ ¡ ¤ ¢ ¤ £g run-hook¤ ¤g before-print-hook¤ ¥g write¤ ¦g assq¤ §f unknown repl option¤ ¨g object->string¤ ©g throw¤C 5 hø ¹ ]4
%&BCI5 4L > " G 4MiN4Oi5 5ARP@RQ?R4RiSX5'RTUVW 4Yi'i5 Z h . - 1 3 L4 L 5@ & g args
C O (R4[i'i5\R4]i4^i'i54_i'i55)R4]i4^i'iT54_i'iT55*R4]i4^i'iU54_i'iU55+R4]i4^i'iV54_i'iV55,R4]i4^i'iW54_i'iW55-R4`iabicŒŒeghi h \ ]L C T g repl
g filenamef system/repl/common.scmŒ
u &ŒŒ Cjh d ]L 6 \ g repl
g filenamef system/repl/common.scmŒ
v %ŒŒ v 4ŒŒ Cklm hH ¦ ] $ <4 5$ O C4 5$ O C4 5$ C 6C ž g prompt
F g filenamef system/repl/common.scmŒ
r ŒŒ s ŒŒ u ŒŒ s ŒŒ v ŒŒ & s ŒŒ / w ŒŒ 9 s ŒŒ @ x !ŒŒ D x ŒŒ F C nklo h … ] $ 4 5$ C 6C} g print
g filenamef system/repl/common.scmŒ
y ŒŒ z ŒŒ | ŒŒ z ŒŒ } ŒŒ } ŒŒ C p4qi5 rst h8 ~ ] $ 4> " G " 4> " G 6 v g x
2 g filenamef system/repl/common.scmŒ
€ ŒŒ ŒŒ ŒŒ 'ŒŒ 2 ‚ ŒŒ 2 C uWWvwxlyz h@ ‡ ] & " & " & " ‚$ C 6 g x
? g filenamef system/repl/common.scmŒ
† ŒŒ
‡ ŒŒ 2 ‡ ŒŒ 9 ‰ ŒŒ = … ŒŒ ? ‰ ŒŒ ? C 5{R(i|R|}~€`{‚ƒV„
hP Ä - . , 3 # 4 5$ " 4 5454 5
4 5 6
¼ g lang
N g debug N g filenamef system/repl/common.scmŒ
Œ
ŒŒ ŒŒ $ ŒŒ + ŒŒ 4 ŒŒ = ‘ ŒŒ D ’ ŒŒ N ŒŒ N g nameg make-replŒ C(R…A†‡ h@ ¢ ]4> " G 4> " G 4> " G 6 š g repl
: g filenamef system/repl/common.scmŒ
•
ŒŒ – ŒŒ — ŒŒ % ˜ ŒŒ 8 ™ ŒŒ : ™ ŒŒ : g nameg repl-welcomeŒ C.R8hMˆ‰)Š‹ŒŽ
hp | ]4 5 $ 644 55445 54
[ $ Ž" 5
‘$ "
4 5 6 t g repl
n g t n g t : M g level O l g filenamef system/repl/common.scmŒ
›
ŒŒ ŒŒ ŒŒ ŒŒ œ ŒŒ ž ŒŒ ŒŒ ŒŒ " *ŒŒ * ŒŒ + ¡ ŒŒ . ¡ ŒŒ 4 ¡ ŒŒ 5 ¢ ŒŒ : ¢ !ŒŒ J ¤ (ŒŒ O ¢ ŒŒ O ¢ ŒŒ T ¥ ŒŒ Y ¥ ŒŒ [ ¥ ŒŒ ` ¥ #ŒŒ e ¥ .ŒŒ i ¥ #ŒŒ n ŒŒ n g nameg repl-promptŒ C/R)‘‹ h Ä ] 44 55 45 45 6 ¼ g repl
g reader g filenamef system/repl/common.scmŒ
§
ŒŒ ¨ ŒŒ ¨ !ŒŒ ¨ ŒŒ ¨ ŒŒ © ŒŒ © !ŒŒ © ŒŒ g nameg repl-readŒ C0R8a h ] 6 ‡ g repl
g filenamef system/repl/common.scmŒ
«
ŒŒ ¬ ŒŒ
¬ ŒŒ
g nameg repl-compile-optionsŒ C’R)’“”•–—‹
h0 á ]4 54 5 4 5 6 Ù g repl
- g form - g from - g opts - g filenamef system/repl/common.scmŒ
®
ŒŒ ¯ ŒŒ
° ŒŒ ¯ ŒŒ ± #ŒŒ ' ² ŒŒ - ± ŒŒ - g nameg repl-compileŒ C1R)’˜“”D–—‹ h@ û ]4 54 5 4 4
5 5 6 ó g repl
: g form : g from : g opts : g filenamef system/repl/common.scmŒ
´
ŒŒ µ ŒŒ
¶ ŒŒ µ ŒŒ · ŒŒ # · .ŒŒ * ¸ ŒŒ 0 · ŒŒ 4 ¹ ŒŒ : · ŒŒ : g nameg repl-expandŒ C4R)’˜G“”D–—‹ hH ]4 54 5 44
4 5 5 4 5 56 g repl
F g form F g from F g opts F g filenamef system/repl/common.scmŒ
»
ŒŒ ¼ ŒŒ
½ ŒŒ ¼ ŒŒ ¾ ŒŒ ¾ ŒŒ & ¾ 9ŒŒ - ¿ )ŒŒ 3 ¾ ŒŒ 4 À ŒŒ < ¾ ŒŒ @  ŒŒ F ¾ ŒŒ F g nameg
repl-optimizeŒ C5R™) h Ï ]
44 55 $ 6C Ç g repl
g form g parser g filenamef system/repl/common.scmŒ
Ä
ŒŒ Å ŒŒ Å !ŒŒ Å ŒŒ Å ŒŒ Æ ŒŒ Æ ŒŒ g nameg
repl-parseŒ C6Rš)›1œ8f‹ h \ ] LL 45 6 T g filenamef system/repl/common.scmŒ
Í ŒŒ Í ŒŒ
Í ŒŒ
C hh C ]44 55 "
4 56$ 844 55„ $ " 4 5 $
O C"ÿÿµ"ÿÿ± ; g repl
c g form c g eval c g t 4 M g filenamef system/repl/common.scmŒ
È
ŒŒ É ŒŒ É #ŒŒ É ŒŒ É ŒŒ Î ŒŒ ! Î ŒŒ ! Ê ŒŒ ( Ë ŒŒ + Ë ,ŒŒ 3 Ë ŒŒ 4 Ë ŒŒ 4 Ë
ŒŒ B Ì ŒŒ H Ì 'ŒŒ J Ì ŒŒ Q Ê ŒŒ c g nameg repl-prepare-eval-thunkŒ C2R2Ÿ¢ h K ] L 6 C g filenamef system/repl/common.scmŒ Ò ŒŒ
C h8 Ù ]4 5 45 U 4O > XCXFG @ Ñ g repl
7 g form 7 g thunk 7 g handler 7 g args , 7 g filenamef system/repl/common.scmŒ
Ð
ŒŒ Ñ ŒŒ Ñ ŒŒ Ò ŒŒ 7 g nameg repl-evalŒ C3R£¤8n¥† hP ä ]
& C4> " G 4 5 $ 64> " G 6 Ü g repl
N g val N g t ( N g filenamef system/repl/common.scmŒ
Ô
ŒŒ Õ ŒŒ × ŒŒ Ù
ŒŒ & Ù ŒŒ ( Ù
ŒŒ ( Ø ŒŒ 8 Ú ŒŒ 9 à
ŒŒ N á
ŒŒ N g nameg
repl-printŒ C7R¦*l§ h0 à ]
44 55 $ " 45 ŽC Ø g repl
- g key - g t * g filenamef system/repl/common.scmŒ
ã
ŒŒ ä ŒŒ ä ŒŒ ä ŒŒ ä ŒŒ å ŒŒ # å ŒŒ ' å ŒŒ + ä ŒŒ
- g nameg repl-option-refŒ C8R¦*l§k hP U ] 44 55 $ " 45 Ž4ŽŽ5$ 4ŽŽ5" CM g repl
P g key P g val P g t * g spec * P g filenamef system/repl/common.scmŒ
ç
ŒŒ è ŒŒ è ŒŒ è ŒŒ è ŒŒ é ŒŒ # é ŒŒ ' é ŒŒ * è ŒŒ / ê ŒŒ 0 ë ŒŒ 5 ë ŒŒ 9 ë ŒŒ = ë ŒŒ > ì ŒŒ A ì ŒŒ G ì ŒŒ N ê ŒŒ P g nameg repl-option-set!Œ C9R¦{l§k hP 9 ]
4 5 $ " 4 5 Ž4ŽŽ5$ 4ŽŽ5" C 1 g key
K g val K g t % g spec % K g filenamef system/repl/common.scmŒ
ï
ŒŒ 𠌌 𠌌 ñ ŒŒ ñ ŒŒ " ñ ŒŒ % 𠌌 * ò ŒŒ + ó ŒŒ 0 ó ŒŒ 4 ó ŒŒ 8 ó ŒŒ 9 ô ŒŒ < ô ŒŒ B ô ŒŒ I ò ŒŒ K g nameg repl-default-option-set!Œ C:R:h h • ] 6 g prompt
g filenamef system/repl/common.scmŒ
÷
ŒŒ ø ŒŒ
ø ŒŒ
g nameg repl-default-prompt-set!ΠC;Rɠ h | ]4 > " G 6 t g x
g filenamef system/repl/common.scmŒ
ÿ
ŒŒ ÿ ŒŒ ÿ ŒŒ g nameg putsŒ CstringŒ C=R©> h — - 1 3 6 g msg
g args g filenamef system/repl/common.scmŒ
ŒŒ
ŒŒ ŒŒ
g nameg
user-errorŒ C>RC ± g m
0 g slots
t Û g constructor t Û g filenamef system/repl/common.scmŒ
ŒŒ 1 ( ŒŒ 8 (
ŒŒ 9 - 7ŒŒ A ( ŒŒ D '
ŒŒ F 0
ŒŒ I /
ŒŒ K ?
ŒŒ N >
ŒŒ \ j
ŒŒ ¡ n ŒŒ § o ŒŒ k ŒŒ A o ŒŒ / n ŒŒ 2 m
ŒŒ 9 ‹
ŒŒ w Œ
ŒŒ u •
ŒŒ
›
ŒŒ §
ŒŒ B «
ŒŒ
| ®
ŒŒ Þ ´
ŒŒ k »
ŒŒ r Ä
ŒŒ ¶ È
ŒŒ < Ð
ŒŒ Ô
ŒŒ » ã
ŒŒ € ç
ŒŒ $ ï
ŒŒ à ÷
ŒŒ ÿ
ŒŒ *
ŒŒ ò
ŒŒ & ô
C6 PK ! <67y, y, debug.gonu „[µü¤ GOOF----LE-8-2.0a, ] ± 4 h- ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g debug¤ ¤
g filenameS¤ f system/repl/debug.scm¤ g importsS¤
g base¤ g pmatch¤
¤ ¤ g syntax¤
¤ ¤ g language¤
¤ ¤ g vm¤ ¤ ¤ g frame¤ ¤ ¤ g ice-9¤ g rdelim¤ ¤ ¤ !g pretty-print¤ " ! ¤ #" ¤ $g format¤ % $ ¤ &% ¤ 'g inspect¤ (' ¤ )g selectS¤ *g %inspect¤ +'*Œ¤ ,+ ¤ -(), ¤ .g program¤ /. ¤ 0/ ¤ 1 #&-0
¤ 2g exportsS¤ 3g ¤ 4g
make-debug¤ 5g debug?¤ 6g debug-frames¤ 7g debug-index¤ 8g debug-error-message¤ 9g debug-for-trap?¤ :g terminal-width¤ ;g print-registers¤ g print-frames¤ ?g
frame->module¤ @g
stack->vector¤ Ag narrow-stack->vector¤ Bg frame->stack-vector¤ C3456789:;<=>?@AB ¤ Dg set-current-module¤ ED ¤ FD ¤ Gg make-record-type¤ Hf ¤ Ig frames¤ Jg index¤ Kg
error-message¤ Lg for-trap?¤ MIJKL ¤ Ng record-predicate¤ Og make-procedure-with-setter¤ Pg record-accessor¤ Qg record-modifier¤ Rg
make-fluid¤ Sg catch¤ TS ¤ US ¤ Vg string->number¤ Wg getenv¤ Xf COLUMNS¤ Yg integer?¤ Zg exact?¤ [g error¤ \f -Expected a column number (a positive integer)¤ ]g make-hash-table¤ ^g
hash-for-each¤ _g
hashq-set!¤ `g hashq-ref¤ ag
reverse-hashq¤ bg per-line-prefixS¤ cb Œ¤ dc ¤ eg current-output-port¤ ff ¤ gf ~aRegisters:~%¤ hg frame-instruction-pointer¤ ig display¤ jg run-hook¤ kg before-print-hook¤ lf ip = ~d
¤ mg frame-stack-pointer¤ nf
sp = #x~x
¤ og
frame-address¤ pf
fp = #x~x
¤ qg widthS¤ rq Œ¤ sb Œ¤ trs ¤ ug frame-bindings¤ vf ~aNo local variables.~%¤ wf ~aLocal variables:~%¤ xg for-each¤ yg frame-local-ref¤ zg
binding:index¤ {g binding:boxed?¤ |f ~a~:[~; (boxed)~] = ~v:@y
¤ }g binding:name¤ ~g indexS¤ ~ Œ¤ €q Œ¤ g full?S¤ ‚ Œ¤ ƒg last-sourceS¤ „ƒ Œ¤ …g next-source?S¤ †… Œ¤ ‡€‚„† ¤ ˆg frame-next-source¤ ‰g frame-source¤ Šg source:file¤ ‹f
current input¤ Œf unknown file¤ g and=>¤ Žg source:line-for-user¤ g
source:column¤ f
~&In ~a:~&¤ ‘f ~9@a~:[~*~3_~;~3d~] ~v:@y~%¤ ’f ~a:~a¤ “f ¤ ”g frame-call-representation¤ •f ¤ – Œ¤ —g forward?S¤ ˜— Œ¤ ™g countS¤ š™ Œ¤ ›g for-trap?S¤ œ› Œ¤ r–˜šœ ¤ žg
vector-length¤ Ÿg max¤ g min¤ ¡g frame-procedure¤ ¢g program?¤ £g program-module¤ ¤g current-module¤ ¥g make-module¤ ¦g module-use!¤ §g
make-variable¤ ¨f 3~:[Read-only~;Mutable~] local variable ~a = ~70:@y
¤ ©g module-add!¤ ªg stack-length¤ «g make-vector¤ ¬g frame-previous¤ g stack-ref¤ ®g
make-stack¤ ¯ ¤ °g %stacks¤C 5 hx ß ]4
12C5 4F > " G 4GiHM53R3 h Û - 1 3 ¨ C Ó g frames
g index g
error-message g for-trap? g defrec-1f507eb13-0 g filenamef system/repl/debug.scmŒ
9
ŒŒ
g nameg
make-debugŒ C4R4Ni3i55R4Oi4Pi3iI54Qi3iI556R4Oi4Pi3iJ54Qi3iJ557R4Oi4Pi3iK54Qi3iK558R4Oi4Pi3iL54Qi3iL559R4Ri5 UVWX h h ] 456 ` g filenamef system/repl/debug.scmŒ
E ŒŒ E 8ŒŒ E @ŒŒ E 8ŒŒ
E (ŒŒ
C h ] - 1 3 C U g args
g filenamef system/repl/debug.scmŒ
E ŒŒ
CYZ[\ h¨ : ) ]3 L [ $ C45 4 5$ #4 5$
”$ " " " $ C HC] $ (4 5$ 4 5$
”" " " $ L \C 6 2 g t
c g w
! U g t
U c g w
e § g filenamef system/repl/debug.scmŒ
B ŒŒ D ŒŒ E ŒŒ ! E ŒŒ $ F ŒŒ . F
ŒŒ / F ŒŒ 9 F
ŒŒ = F *ŒŒ A F
ŒŒ U D ŒŒ e B ŒŒ k I ŒŒ l I ŒŒ v I ŒŒ w I )ŒŒ I ŒŒ … I 4ŒŒ ” I ŒŒ ˜ I ŒŒ £ K ŒŒ § K ŒŒ c
e § C O :R]^_` h ]L 4L 5Œ6 ‡ g k
g v g filenamef system/repl/debug.scmŒ
S ŒŒ T !ŒŒ T 2ŒŒ T !ŒŒ T ŒŒ T ŒŒ C h( ™ ] 45 4O > " G C ‘ g h
% g ret % g filenamef system/repl/debug.scmŒ
P
ŒŒ Q
ŒŒ Q ŒŒ
R ŒŒ % g nameg
reverse-hashqŒ CaRdef$ghijklmnop h Ó - / 0 3 # 45 # 4> " G 4 5 4> " G 4 > " G 4
> " G 4 5 4> " G 4 > " G 4 > " G 4
5 4> " G 4 > " G 6 Ë g frame
g port g per-line-prefix g val G Š g val ‘ Ô g val Û g filenamef system/repl/debug.scmŒ
X
ŒŒ X 1ŒŒ ( Y 1ŒŒ + _ ŒŒ 1 _ ŒŒ 8 _ ŒŒ A ` ŒŒ G ` ŒŒ J [ ŒŒ ^ \ ŒŒ r ] ŒŒ x ` ŒŒ ] ŒŒ ‹ a ŒŒ ‘ a ŒŒ ” [ ŒŒ ¨ \ ŒŒ ¼ ] ŒŒ  a ŒŒ É ] ŒŒ Õ b ŒŒ Û b ŒŒ Þ [ ŒŒ ò \ ŒŒ b ŒŒ ] ŒŒ g per-line-prefixS Œ g nameg print-registersŒ C;Rte:fu$vwxyz{ijk$|}
hp ê ] 4L 4 55 4 5$ " 4LL> " G 4> " G L4 54 5L6 â g binding
m g x ) g v ) m g filenamef system/repl/debug.scmŒ
m ŒŒ n ŒŒ n 2ŒŒ n ŒŒ n ŒŒ o ŒŒ o ŒŒ p ŒŒ ) n ŒŒ , r ŒŒ @ s ŒŒ Y t ŒŒ Z u ŒŒ a u *ŒŒ m t ŒŒ m C h€ ] - / 0 3 # 45 # 45 # 4 5 (
64> " G
O 4 56 U g frame
~ g port ~ g width ~ g per-line-prefix ~ g bindings > ~ g filenamef system/repl/debug.scmŒ
d
ŒŒ d .ŒŒ ' e $ŒŒ 5 e GŒŒ 8 f ŒŒ > f ŒŒ F g ŒŒ L i ŒŒ P i ŒŒ Q k ŒŒ W k ŒŒ ^ k ŒŒ v v ŒŒ ~ l ŒŒ ~ g widthS Œg per-line-prefixS Œ g nameg print-localsŒ C " G " 4 $ 4
5" 4 5> " G $ 6C g frame
D g port D g index D g width D g full? D g last-source D g next-source? D g source d D g t s † g file Œ D g line — D g col
¢ D g t ¹ Ì
g filenamef system/repl/debug.scmŒ
x
ŒŒ x -ŒŒ 0 y )ŒŒ R ŒŒ X ŒŒ d ŒŒ d ŒŒ l | ŒŒ m } ŒŒ s } ŒŒ ƒ } !ŒŒ Œ ~ ŒŒ Œ ŒŒ ŒŒ — ŒŒ š ‚ ŒŒ ¢ ŒŒ ª ƒ ŒŒ ² | ŒŒ ³ } ŒŒ ¹ } ŒŒ É } !ŒŒ Ò ~ ŒŒ Ó ƒ ŒŒ × ƒ ŒŒ Ü „ ŒŒ â „ ŒŒ é „ ŒŒ ö … ŒŒ ü … ŒŒ † ŒŒ † ŒŒ † ŒŒ † ŒŒ † 2ŒŒ ‡ ŒŒ & … ŒŒ 4 ˆ ŒŒ @ Š (ŒŒ B ‰ ŒŒ ) D g indexS Œg widthS Œg full?S Œg last-sourceS Œg next-source?S Œ g nameg print-frameŒ C=Re:žŸ =~qƒ…‰ˆ h€ _ - / 0 3
# 45 # 45 # # # # 4 5 $
”" $
" 4
–5 " $
45" ™" !$
’$ ™" "ÿÿÍ" "ÿÿÅ " ž
“$ “
“$ ˆ
£ 4
‘$ " > " G
$ " ÿ–" 4
5" %
‘$ $ 4 5" "ÿÿØ" "ÿÿÐ
"ÿÿfCC$ "
"ÿÿK W g frames
y g port y g width y g full? y g forward? y g count y g for-trap? y g len X y g lower-idx } y g upper-idx ¾ y g i
Ä b g last-source Ä b g frame Û ^
g filenamef system/repl/debug.scmŒ
Œ
ŒŒ (ŒŒ ' Ž $ŒŒ R ŒŒ X ŒŒ ` ‘ ŒŒ c ‘ (ŒŒ i ‘ ŒŒ m ‘ ŒŒ s “ ŒŒ { “ ŒŒ } “ ŒŒ } ŒŒ ‰ – ŒŒ Š – &ŒŒ ™ – ŒŒ ” ŒŒ ¦ ” #ŒŒ « ” ŒŒ ® • ŒŒ ¾ ŒŒ Ä ˜ ŒŒ É š
ŒŒ Í š ŒŒ Ò š
ŒŒ Û › ŒŒ Û ›
ŒŒ Þ œ ŒŒ ù ž -ŒŒ þ ž (ŒŒ
œ ŒŒ — ŒŒ " Ÿ ŒŒ ' ¢ ŒŒ 1 ŒŒ 4 ŒŒ 9 ŒŒ ? ŒŒ @ ¡ ŒŒ ^ Ÿ ŒŒ b ˜ ŒŒ h ˜ ŒŒ y ˜ ŒŒ , y g widthS Œg full?S Œg forward?S Œg countS Œg for-trap?S Œ g nameg print-framesŒ C>R¡¢£¤¥¦xyz{§$¨}© hp ]4L 4 55 4 5$ " 45 44 54 5$ " > " G L4 56 g binding
l g x l g var * l g filenamef system/repl/debug.scmŒ
¯ ŒŒ ° ŒŒ ° .ŒŒ ° ŒŒ °
ŒŒ ± ŒŒ ± ŒŒ $ ± 8ŒŒ * °
ŒŒ - ² ŒŒ 2 ³ ŒŒ 3 ´ ŒŒ : µ ŒŒ C ¶ ŒŒ G ¶ ŒŒ J ¶ 1ŒŒ U ² ŒŒ b · !ŒŒ l · ŒŒ l Cu
hx @ ]4 5 45$ ]45 $ " 45 45 4> " G 4 O 4 5> " G C6 8 g frame
w g proc w g t 3 g mod 3 s g mod* : s g filenamef system/repl/debug.scmŒ
¨
ŒŒ © ŒŒ © ŒŒ ª ŒŒ ª ŒŒ « ŒŒ « ŒŒ , « .ŒŒ 3 « ŒŒ 6 ¬ ŒŒ : « ŒŒ =
ŒŒ Q ®
ŒŒ ] ¸ ŒŒ h ®
ŒŒ w º ŒŒ w g nameg
frame->moduleŒ C?Rª«¬ h` G ]!4 5 45
”$ ?" &’$ ¤—45 "ÿÿÞ"
4
5 "ÿÿÉ" C ? g stack
^ g len ^ g v ^ g i F g frame F g filenamef system/repl/debug.scmŒ
½
ŒŒ ¾ ŒŒ ¾ ŒŒ ¿ ŒŒ ¾ ŒŒ À ŒŒ À ŒŒ Á ŒŒ %  ŒŒ ) Â
ŒŒ 0 Ä ŒŒ 3 Å ŒŒ 4 Å ŒŒ B Å ŒŒ F Á ŒŒ H Á ŒŒ W Á ŒŒ ^ g nameg
stack->vectorŒ C@R®@¯ h0 å - 1 3 44
5? $ 6C Ý g stack
) g args ) g narrowed ) g filenamef system/repl/debug.scmŒ
È
ŒŒ
É ŒŒ
É $ŒŒ É ŒŒ É ŒŒ Ê ŒŒ & Ë ŒŒ ( Ì ŒŒ )
g nameg narrow-stack->vectorŒ CAR°A® h8 Ë ] [ˆ$ [Ž" 4 5
$ " 6 Ã g frame
1 g tag 1 g filenamef system/repl/debug.scmŒ
Î
ŒŒ Ï ŒŒ
Ï
ŒŒ Ð ŒŒ Ï ŒŒ Ò ŒŒ ) Ü ŒŒ 1 Ñ ŒŒ 1 g nameg frame->stack-vectorŒ CBRC× g m
, g set-width
ë g filenamef system/repl/debug.scmŒ
ŒŒ : 9
ŒŒ å A ŒŒ ë A ŒŒ @
ŒŒ œ P
ŒŒ ® X
ŒŒ
( d
ŒŒ Ò x
ŒŒ â Œ
ŒŒ k ¨
ŒŒ * ½
ŒŒ X È
ŒŒ v Î
ŒŒ x
C6 PK ! €L¼W:Å :Å coop-server.gonu „[µü¤ GOOF----LE-8-2.0"Å ]Î 4 hO^ ] g guile¤ ¤ g define-module*¤ ¤ ¤ g system¤ g repl¤ g coop-server¤ ¤
g filenameS¤ f system/repl/coop-server.scm¤ g importsS¤
g ice-9¤ g match¤
¤ ¤ g receive¤
¤ ¤ g threads¤
¤ ¤ g q¤
¤ ¤ g srfi¤ g srfi-9¤ ¤ ¤ ¤ g selectS¤ g start-repl*¤ !g prompting-meta-read¤ " ! ¤ # " ¤ $g server¤ %$ ¤ &g run-server*¤ 'g make-tcp-server-socket¤ (g add-open-socket!¤ )g
close-socket!¤ *g guard-against-http-request¤ +&'()* ¤ ,% + ¤ - #, ¤ .g exportsS¤ /g spawn-coop-repl-server¤ 0g poll-coop-repl-server¤ 1/0 ¤ 2g set-current-module¤ 32 ¤ 42 ¤ 5g ¤ 6g !%%make-coop-repl-server-procedure¤ 7g make-syntax-transformer¤ 87 ¤ 97 ¤ :g %make-coop-repl-server¤ ;g macro¤ < ¤ ?g _¤ @g any¤ A?@@ ¤ Bg
syntax-object¤ Cg lambda¤ Dg m-6cff15a80cd23e5-5¤ Eg top¤ FDE ¤ Gg ribcage¤ Hg t-6cff15a80cd23e5-3¤ Ig t-6cff15a80cd23e5-4¤ JHI ¤ KFF ¤ Lf l-6cff15a80cd23e5-a¤ Mf l-6cff15a80cd23e5-b¤ NLM ¤ OGJKN ¤ PG ¤ Qg x¤ RQ ¤ SF ¤ Tf l-6cff15a80cd23e5-7¤ UT ¤ VGRSU ¤ Wg shift¤ Xg proc-name¤ Yg args¤ ZXY ¤ [E ¤ \[[ ¤ ]f l-1e8ba8b5a-2ba¤ ^f l-1e8ba8b5a-2bb¤ _]^ ¤ `GZ\_ ¤ ag key¤ bg value¤ cg name¤ dg formals¤ eg body¤ fabcde ¤ g[[[[[ ¤ hf l-1e8ba8b5a-2ad¤ if l-1e8ba8b5a-2ae¤ jf l-1e8ba8b5a-2af¤ kf l-1e8ba8b5a-2b0¤ lf l-1e8ba8b5a-2b1¤ mhijkl ¤ nGfgm ¤ og make-procedure-name¤ po ¤ q[ ¤ rf l-1e8ba8b5a-29d¤ sr ¤ tGpqs ¤ u[ ¤ vf l-1e8ba8b5a-29c¤ wv ¤ xGRuw ¤ yFOPVWPPPP`ntx
¤ zg hygiene¤ {z ¤ |BCy{ ¤ }g mutex¤ ~[OPV ¤ z ¤ €B}~ ¤ g queue¤ ‚B~ ¤ ƒ€‚ ¤ „g make-struct¤ …g m-6cff15a80cd23e5-1¤ †…E ¤ ‡g t-1e8ba8b5a-38d¤ ˆg t-1e8ba8b5a-38c¤ ‰g t-1e8ba8b5a-38b¤ Š‡ˆ‰ ¤ ‹g m-1e8ba8b5a-38e¤ Œ‹E ¤ ŒŒŒ ¤ Žf l-1e8ba8b5a-392¤ f l-1e8ba8b5a-393¤ f l-1e8ba8b5a-394¤ ‘Ž ¤ ’GŠ‘ ¤ “g ctor-args¤ ”“ ¤ •f l-1e8ba8b5a-37a¤ –• ¤ —G”u– ¤ ˜g ctor¤ ™g field¤ š˜™ ¤ ›f l-1e8ba8b5a-376¤ œf l-1e8ba8b5a-377¤ ›œ ¤ žGš\ ¤ Ÿg form¤ g type-name¤ ¡g constructor-spec¤ ¢g field-names¤ £Ÿ ¡¢ ¤ ¤[[[[ ¤ ¥f l-1e8ba8b5a-36b¤ ¦f l-1e8ba8b5a-36c¤ §f l-1e8ba8b5a-36d¤ ¨f l-1e8ba8b5a-36e¤ ©¥¦§¨ ¤ ªG£¤© ¤ «g
record-layout¤ ¬g functional-setters¤ g setters¤ ®g copier¤ ¯g getters¤ °g constructor¤ ±g getter-identifiers¤ ²g field-identifiers¤ ³«¬®¯°±² ¤ ´[[[[[[[[ ¤ µf l-1e8ba8b5a-343¤ ¶f l-1e8ba8b5a-341¤ ·f l-1e8ba8b5a-33f¤ ¸f l-1e8ba8b5a-33d¤ ¹f l-1e8ba8b5a-33b¤ ºf l-1e8ba8b5a-339¤ »f l-1e8ba8b5a-337¤ ¼f l-1e8ba8b5a-335¤ ½µ¶·¸¹º»¼ ¤ ¾G³´½ ¤ ¿f l-1e8ba8b5a-334¤ À¿ ¤ ÁGRuÀ ¤ †OPVWP’PPP—žPª¾Á ¤ ÃB„Â{ ¤ ÄB5~ ¤ ÅB
Â{ ¤ ÆÃÄÅ€‚ ¤ Ç|ƒÆ ¤ Èg each-any¤ É?ÈŒ¤ Êg syntax-violation¤ Ë Ê ¤ Ì Ê ¤ Íf Wrong number of arguments¤ Îg identifier?¤ Ï Î ¤ Ð Î ¤ Ñ[PV ¤ ÒB6Ñ ¤ ÓÊ ¤ ÔÊ ¤ Õf -source expression failed to match any pattern¤ Ög record-type-vtable¤ × Ö ¤ Ø Ö ¤ Ùg pwpw¤ Úg default-record-printer¤ Û Ú ¤ Ü Ú ¤ Ý} ¤ Þg set-struct-vtable-name!¤ ß Þ ¤ à Þ ¤ ág vtable-offset-user¤ â á ¤ ã á ¤ äg %coop-repl-server?-procedure¤ åg coop-repl-server?¤ æ?@ ¤ çg m-6cff15a80cd23e5-14¤ èçE ¤ ég t-6cff15a80cd23e5-13¤ êé ¤ ëè ¤ ìf l-6cff15a80cd23e5-19¤ íì ¤ îGêëí ¤ ïf l-6cff15a80cd23e5-16¤ ðï ¤ ñGRëð ¤ òèîPñWPPPP`ntx
¤ óBCò{ ¤ ôg obj¤ õg t-1e8ba8b5a-47e¤ ög t-1e8ba8b5a-478¤ ÷g t-1e8ba8b5a-479¤ øg t-1e8ba8b5a-47a¤ ùg t-1e8ba8b5a-47d¤ úg t-1e8ba8b5a-47c¤ ûg t-1e8ba8b5a-47b¤ üõö÷øùúû ¤ ýg m-1e8ba8b5a-47f¤ þýE ¤ ÿþþþþþþþ ¤ f l-1e8ba8b5a-483¤ f l-1e8ba8b5a-484¤ f l-1e8ba8b5a-485¤ f l-1e8ba8b5a-486¤ f l-1e8ba8b5a-487¤ f l-1e8ba8b5a-488¤ f l-1e8ba8b5a-489¤ ¤ Güÿ ¤ g copier-id¤
¤ f l-1e8ba8b5a-476¤ ¤
G
u ¤ g ctor-name¤ ¤ f l-1e8ba8b5a-46e¤ ¤ Gu ¤ ¢ ¤ f l-1e8ba8b5a-46c¤ ¤ Gu ¤ g layout¤ ¤ f l-1e8ba8b5a-46a¤ ¤ Gu ¤ g
immutable?¤ ¤ f l-1e8ba8b5a-468¤ ¤ G u ¤ !g field-count¤ "! ¤ #f l-1e8ba8b5a-466¤ $# ¤ %G"u$ ¤ &g
getter-ids¤ '& ¤ (f l-1e8ba8b5a-463¤ )( ¤ *G'u) ¤ +g field-ids¤ ,+ ¤ -f l-1e8ba8b5a-460¤ .- ¤ /G,u. ¤ 0g predicate-name¤ 1g
field-spec¤ 2 Ÿ ¡01 ¤ 3[[[[[[ ¤ 4f l-1e8ba8b5a-453¤ 5f l-1e8ba8b5a-454¤ 6f l-1e8ba8b5a-455¤ 7f l-1e8ba8b5a-456¤ 8f l-1e8ba8b5a-457¤ 9f l-1e8ba8b5a-458¤ :456789 ¤ ;G23: ¤ <†îPñWPPPPP
PPPP P%P*P/;¾Á ¤ =Bô<{ ¤ >= ¤ ?g and¤ @B?<{ ¤ Ag struct?¤ BBA<{ ¤ CB= ¤ Dg eq?¤ EBD<{ ¤ Fg
struct-vtable¤ GBF<{ ¤ HG= ¤ I[îPñ ¤ JB5I ¤ KEHJ ¤ L@CK ¤ Mó>L ¤ N[Pñ ¤ OBäN ¤ Pg throw-bad-struct¤ Q P ¤ R P ¤ Sg coop-repl-server-mutex¤ Tg !%coop-repl-server-mutex-procedure¤ Ug free-id¤ Vg
%%on-error¤ Wg m-6cff15a80cd23e5-20¤ XWE ¤ YX ¤ Zf l-6cff15a80cd23e5-22¤ [Z ¤ \GRY[ ¤ ]XP\WPPPP`ntx ¤ ^BV]{ ¤ _U^ ¤ `_@ ¤ ag %%type¤ bg t-1e8ba8b5a-3a5¤ cg t-1e8ba8b5a-3a6¤ dg t-1e8ba8b5a-3a7¤ eg t-1e8ba8b5a-3a8¤ fg t-1e8ba8b5a-3a9¤ gg t-1e8ba8b5a-3aa¤ hg t-1e8ba8b5a-3ab¤ ibcdefgh ¤ jg m-1e8ba8b5a-3ac¤ kjE ¤ lkkkkkkk ¤ mf l-1e8ba8b5a-3b0¤ nf l-1e8ba8b5a-3b1¤ of l-1e8ba8b5a-3b2¤ pf l-1e8ba8b5a-3b3¤ qf l-1e8ba8b5a-3b4¤ rf l-1e8ba8b5a-3b5¤ sf l-1e8ba8b5a-3b6¤ tmnopqrs ¤ uGilt ¤ vg getter¤ wg index¤ xvw ¤ yf l-1e8ba8b5a-3a3¤ zf l-1e8ba8b5a-3a4¤ {yz ¤ |Gx\{ ¤ } & ¤ ~[[[ ¤ f l-1e8ba8b5a-39e¤ €f l-1e8ba8b5a-39f¤ f l-1e8ba8b5a-3a0¤ ‚€ ¤ ƒG}~‚ ¤ „†P\WPuPPP|Pƒ¾Á ¤ …Ba„{ ¤ †U… ¤ ‡?`†@ ¤ ˆg ck¤ ‰g err¤ Šg s¤ ‹‰Š ¤ ŒXX ¤ f l-6cff15a80cd23e5-25¤ Žf l-6cff15a80cd23e5-26¤ Ž ¤ G‹Œ ¤ ‘XP\WPPPP`ntx
¤ ’Bˆ‘{ ¤ “g quote¤ ”B“‘{ ¤ •[P\ ¤ –B5• ¤ —”– ¤ ˜— ¤ ™g %%index¤ šB™„{ ¤ ›Uš ¤ œ?`›@ ¤ f l-6cff15a80cd23e5-2a¤ žf l-6cff15a80cd23e5-2b¤ Ÿž ¤ G‹ŒŸ ¤ ¡X P\WPPPP`ntx
¤ ¢Bˆ¡{ ¤ £B“¡{ ¤ ¤ P\ ¤ ¥B
¤ ¤ ¦£¥ ¤ §¦ ¤ ¨g %%copier¤ ©B¨„{ ¤ ªU© ¤ «?`ª@ ¤ ¬f l-6cff15a80cd23e5-2f¤ f l-6cff15a80cd23e5-30¤ ®¬ ¤ ¯G‹Œ® ¤ °X¯P\WPPPP`ntx
¤ ±Bˆ°{ ¤ ²B“°{ ¤ ³g %%-set-fields¤ ´[¯P\ ¤ µB³´ ¤ ¶²µ ¤ ·¶ ¤ ¸g t-6cff15a80cd23e5-1f¤ ¹¸ ¤ ºf l-6cff15a80cd23e5-34¤ »º ¤ ¼G¹Y» ¤ ½X¼P\WPPPP`ntx
¤ ¾BC½{ ¤ ¿†¼P\WPuPPP|Pƒ¾Á ¤ ÀBŠ¿{ ¤ ÁÀ ¤ Âg if¤ ÃB¿{ ¤ ÄBD¿{ ¤ ÅBF¿{ ¤ ÆÅÀ ¤ Ç[¼P\ ¤ ÈB5Ç ¤ ÉÄÆÈ ¤ Êg
struct-ref¤ ËBÊ¿{ ¤ ̼P\ ¤ ÍB
Ì ¤ ÎËÀÍ ¤ ÏBP¿{ ¤ ÐB“¿{ ¤ ÑBSÇ ¤ ÒÐÑ ¤ ÓÏÀÒ ¤ ÔÃÉÎÓ ¤ Õ¾ÁÔ ¤ Ö[P\ ¤ ×BTÖ ¤ Øg coop-repl-server-queue¤ Ùg !%coop-repl-server-queue-procedure¤ Úg m-6cff15a80cd23e5-3b¤ ÛÚE ¤ ÜÛ ¤ Ýf l-6cff15a80cd23e5-3d¤ ÞÝ ¤ ßGRÜÞ ¤ àÛPßWPPPP`ntx ¤ áBVà{ ¤ âUá ¤ ãâ@ ¤ ä†PßWPuPPP|Pƒ¾Á ¤ åBaä{ ¤ æUå ¤ ç?ãæ@ ¤ èÛÛ ¤ éf l-6cff15a80cd23e5-40¤ êf l-6cff15a80cd23e5-41¤ ëéê ¤ ìG‹èë ¤ íÛìPßWPPPP`ntx
¤ îBˆí{ ¤ ïB“í{ ¤ ð[ìPß ¤ ñB5ð ¤ òïñ ¤ óò ¤ ôB™ä{ ¤ õUô ¤ ö?ãõ@ ¤ ÷f l-6cff15a80cd23e5-45¤ øf l-6cff15a80cd23e5-46¤ ù÷ø ¤ úG‹èù ¤ ûÛúPßWPPPP`ntx
¤ üBˆû{ ¤ ýB“û{ ¤ þúPß ¤ ÿB þ ¤ ýÿ ¤ ¤ B¨ä{ ¤ U ¤ ?ã@ ¤ f l-6cff15a80cd23e5-4a¤ f l-6cff15a80cd23e5-4b¤ ¤ G‹è ¤ ÛPßWPPPP`ntx
¤
Bˆ { ¤ B“ { ¤ [Pß ¤
B³ ¤
¤ ¤ g t-6cff15a80cd23e5-3a¤ ¤ f l-6cff15a80cd23e5-4f¤ ¤ GÜ ¤ ÛPßWPPPP`ntx
¤ BC{ ¤ †PßWPuPPP|Pƒ¾Á ¤ BŠ{ ¤ ¤ BÂ{ ¤ BD{ ¤ BF{ ¤ ¤ [Pß ¤ B5 ¤ ¤ !BÊ{ ¤ "Pß ¤ #B " ¤ $!# ¤ %BP{ ¤ &B“{ ¤ 'BØ ¤ (&' ¤ )%( ¤ * $) ¤ +* ¤ ,[Pß ¤ -BÙ, ¤ .g each¤ /@@ ¤ 0./ ¤ 1@0Œ¤ 2@1Œ¤ 3@2Œ¤ 4g %%set-fields¤ 5g dummy¤ 6g check?¤ 7g expr¤ 856Šv7 ¤ 9g m-6cff15a80cd23e5-56¤ :9E ¤ ;:†††† ¤ f l-6cff15a80cd23e5-5d¤ ?f l-6cff15a80cd23e5-5e¤ @f l-6cff15a80cd23e5-5f¤ A<=>?@ ¤ BG8;A ¤ C: ¤ Df l-6cff15a80cd23e5-58¤ ED ¤ FGRCE ¤ Gg t-1e8ba8b5a-3c4¤ Hg t-1e8ba8b5a-3c6¤ Ig t-1e8ba8b5a-3c5¤ JGHI ¤ Kg m-1e8ba8b5a-3c7¤ LKE ¤ MLLL ¤ Nf l-1e8ba8b5a-3cb¤ Of l-1e8ba8b5a-3cc¤ Pf l-1e8ba8b5a-3cd¤ QNOP ¤ RGJMQ ¤ Sf l-1e8ba8b5a-3c1¤ Tf l-1e8ba8b5a-3c2¤ Uf l-1e8ba8b5a-3c3¤ VSTU ¤ WG}~V ¤ X†BPFWPRPPPW¾Á
¤ YB4X{ ¤ Z[BPF ¤ [B5Z ¤ \BSZ ¤ ]BØZ ¤ ^\] ¤ _g map¤ `_ ¤ a_ ¤ bg list¤ cg
make-mutex¤ dg make-q¤ eg make-coop-repl-server¤ fg
lock-mutex¤ gf ¤ hf ¤ ig unlock-mutex¤ ji ¤ ki ¤ lg enq!¤ mg coop-repl-server-eval¤ ng ¤ og %%make-coop-repl-procedure¤ pg %make-coop-repl¤ q?@@@@ ¤ rg m-6cff15a80cd23e5-91¤ srE ¤ tg t-6cff15a80cd23e5-8d¤ ug t-6cff15a80cd23e5-8e¤ vg t-6cff15a80cd23e5-8f¤ wg t-6cff15a80cd23e5-90¤ xtuvw ¤ yssss ¤ zf l-6cff15a80cd23e5-96¤ {f l-6cff15a80cd23e5-97¤ |f l-6cff15a80cd23e5-98¤ }f l-6cff15a80cd23e5-99¤ ~z{|} ¤ Gxy~ ¤ €s ¤ f l-6cff15a80cd23e5-93¤ ‚ ¤ ƒGR€‚ ¤ „sPƒWPPPP`ntx
¤ …BC„{ ¤ †[Pƒ ¤ ‡B}† ¤ ˆg condvar¤ ‰Bˆ† ¤ Šg thunk¤ ‹BŠ† ¤ Œg cont¤ BŒ† ¤ Ž‡‰‹ ¤ g m-6cff15a80cd23e5-8b¤ E ¤ ‘PƒWP’PPP—žPª¾Á ¤ ’B„‘{ ¤ “Bn† ¤ ”B
‘{ ¤ •’“”‡‰‹ ¤ –…Ž• ¤ —[Pƒ ¤ ˜Bo— ¤ ™g pwpwpwpw¤ š}ˆŠŒ ¤ ›g %coop-repl?-procedure¤ œg
coop-repl?¤ g m-6cff15a80cd23e5-a4¤ žE ¤ Ÿg t-6cff15a80cd23e5-a3¤ Ÿ ¤ ¡ž ¤ ¢f l-6cff15a80cd23e5-a9¤ £¢ ¤ ¤G ¡£ ¤ ¥f l-6cff15a80cd23e5-a6¤ ¦¥ ¤ §GR¡¦ ¤ ¨ž¤P§WPPPP`ntx
¤ ©BC¨{ ¤ ª¤P§WPPPPP
PPPP P%P*P/;¾Á ¤ «Bôª{ ¤ ¬« ¤ B?ª{ ¤ ®BAª{ ¤ ¯®« ¤ °BDª{ ¤ ±BFª{ ¤ ²±« ¤ ³[¤P§ ¤ ´Bn³ ¤ µ°²´ ¤ ¶¯µ ¤ ·©¬¶ ¤ ¸[P§ ¤ ¹B›¸ ¤ ºg coop-repl-mutex¤ »g %coop-repl-mutex-procedure¤ ¼g m-6cff15a80cd23e5-b0¤ ½¼E ¤ ¾½ ¤ ¿f l-6cff15a80cd23e5-b2¤ À¿ ¤ ÁGR¾À ¤ ½PÁWPPPP`ntx ¤ ÃBVÂ{ ¤ ÄUà ¤ ÅÄ@ ¤ ÆPÁWPuPPP|Pƒ¾Á ¤ ÇBaÆ{ ¤ ÈUÇ ¤ É?ÅÈ@ ¤ ʽ½ ¤ Ëf l-6cff15a80cd23e5-b5¤ Ìf l-6cff15a80cd23e5-b6¤ ÍËÌ ¤ ÎG‹ÊÍ ¤ ϽÎPÁWPPPP`ntx
¤ ÐBˆÏ{ ¤ ÑB“Ï{ ¤ Ò[ÎPÁ ¤ ÓBnÒ ¤ ÔÑÓ ¤ ÕÔ ¤ ÖB™Æ{ ¤ ×UÖ ¤ Ø?Å×@ ¤ Ùf l-6cff15a80cd23e5-ba¤ Úf l-6cff15a80cd23e5-bb¤ ÛÙÚ ¤ ÜG‹ÊÛ ¤ ݽÜPÁWPPPP`ntx
¤ ÞBˆÝ{ ¤ ßB“Ý{ ¤ àÜPÁ ¤ áB
à ¤ âßá ¤ ãâ ¤ äB¨Æ{ ¤ åUä ¤ æ?Åå@ ¤ çf l-6cff15a80cd23e5-bf¤ èf l-6cff15a80cd23e5-c0¤ éçè ¤ êG‹Êé ¤ ë½êPÁWPPPP`ntx
¤ ìBˆë{ ¤ íB“ë{ ¤ îg %%-set-fields¤ ï[êPÁ ¤ ðBîï ¤ ñíð ¤ òñ ¤ óg t-6cff15a80cd23e5-af¤ ôó ¤ õf l-6cff15a80cd23e5-c4¤ öõ ¤ ÷Gô¾ö ¤ ø½÷PÁWPPPP`ntx
¤ ùBCø{ ¤ ú÷PÁWPuPPP|Pƒ¾Á ¤ ûBŠú{ ¤ üû ¤ ýBÂú{ ¤ þBDú{ ¤ ÿBFú{ ¤ ÿû ¤ [÷PÁ ¤ Bn ¤ þ ¤ BÊú{ ¤ ÷PÁ ¤ B
¤ û ¤ BPú{ ¤ B“ú{ ¤
Bº ¤
¤ û ¤
ý ¤ ùü
¤ [PÁ ¤ B» ¤ g coop-repl-condvar¤ g %coop-repl-condvar-procedure¤ g m-6cff15a80cd23e5-cb¤ E ¤ ¤ f l-6cff15a80cd23e5-cd¤ ¤ GR ¤ PWPPPP`ntx ¤ BV{ ¤ U ¤ @ ¤ PWPuPPP|Pƒ¾Á ¤ Ba { ¤ U ¤ ? @ ¤ ! ¤ "f l-6cff15a80cd23e5-d0¤ #f l-6cff15a80cd23e5-d1¤ $"# ¤ %G‹!$ ¤ &%PWPPPP`ntx
¤ 'Bˆ&{ ¤ (B“&{ ¤ )[%P ¤ *Bn) ¤ +(* ¤ ,+ ¤ -B™ { ¤ .U- ¤ /? .@ ¤ 0f l-6cff15a80cd23e5-d5¤ 1f l-6cff15a80cd23e5-d6¤ 201 ¤ 3G‹!2 ¤ 43PWPPPP`ntx
¤ 5Bˆ4{ ¤ 6B“4{ ¤ 73P ¤ 8B 7 ¤ 968 ¤ :9 ¤ ;B¨ { ¤ <U; ¤ =? <@ ¤ >f l-6cff15a80cd23e5-da¤ ?f l-6cff15a80cd23e5-db¤ @>? ¤ AG‹!@ ¤ BAPWPPPP`ntx
¤ CBˆB{ ¤ DB“B{ ¤ E[AP ¤ FBîE ¤ GDF ¤ HG ¤ Ig t-6cff15a80cd23e5-ca¤ JI ¤ Kf l-6cff15a80cd23e5-df¤ LK ¤ MGJL ¤ NMPWPPPP`ntx
¤ OBCN{ ¤ PMPWPuPPP|Pƒ¾Á ¤ QBŠP{ ¤ RQ ¤ SBÂP{ ¤ TBDP{ ¤ UBFP{ ¤ VUQ ¤ W[MP ¤ XBnW ¤ YTVX ¤ ZBÊP{ ¤ [MP ¤ \B [ ¤ ]ZQ\ ¤ ^BPP{ ¤ _B“P{ ¤ `BW ¤ a_` ¤ b^Qa ¤ cSY]b ¤ dORc ¤ e[P ¤ fBe ¤ gg coop-repl-read-thunk¤ hg %coop-repl-read-thunk-procedure¤ ig m-6cff15a80cd23e5-e6¤ jiE ¤ kj ¤ lf l-6cff15a80cd23e5-e8¤ ml ¤ nGRkm ¤ ojPnWPPPP`ntx ¤ pBVo{ ¤ qUp ¤ rq@ ¤ sPnWPuPPP|Pƒ¾Á ¤ tBas{ ¤ uUt ¤ v?ru@ ¤ wjj ¤ xf l-6cff15a80cd23e5-eb¤ yf l-6cff15a80cd23e5-ec¤ zxy ¤ {G‹wz ¤ |j{PnWPPPP`ntx
¤ }Bˆ|{ ¤ ~B“|{ ¤ [{Pn ¤ €Bn ¤ ~€ ¤ ‚ ¤ ƒB™s{ ¤ „Uƒ ¤ …?r„@ ¤ †f l-6cff15a80cd23e5-f0¤ ‡f l-6cff15a80cd23e5-f1¤ ˆ†‡ ¤ ‰G‹wˆ ¤ Šj‰PnWPPPP`ntx
¤ ‹BˆŠ{ ¤ ŒB“Š{ ¤ ‰Pn ¤ ŽB ¤ ŒŽ ¤ ¤ ‘B¨s{ ¤ ’U‘ ¤ “?r’@ ¤ ”f l-6cff15a80cd23e5-f5¤ •f l-6cff15a80cd23e5-f6¤ –”• ¤ —G‹w– ¤ ˜j—PnWPPPP`ntx
¤ ™Bˆ˜{ ¤ šB“˜{ ¤ ›[—Pn ¤ œBî› ¤ šœ ¤ ž ¤ Ÿg t-6cff15a80cd23e5-e5¤ Ÿ ¤ ¡f l-6cff15a80cd23e5-fa¤ ¢¡ ¤ £G k¢ ¤ ¤j£PnWPPPP`ntx
¤ ¥BC¤{ ¤ ¦£PnWPuPPP|Pƒ¾Á ¤ §BŠ¦{ ¤ ¨§ ¤ ©B¦{ ¤ ªBD¦{ ¤ «BF¦{ ¤ ¬«§ ¤ [£Pn ¤ ®Bn ¤ ¯ª¬® ¤ °Bʦ{ ¤ ±£Pn ¤ ²B ± ¤ ³°§² ¤ ´BP¦{ ¤ µB“¦{ ¤ ¶Bg ¤ ·µ¶ ¤ ¸´§· ¤ ¹©¯³¸ ¤ º¥¨¹ ¤ »[Pn ¤ ¼Bh» ¤ ½g coop-repl-cont¤ ¾g %coop-repl-cont-procedure¤ ¿g m-6cff15a80cd23e5-101¤ À¿E ¤ ÁÀ ¤ Âf l-6cff15a80cd23e5-103¤ ठÄGRÁà ¤ ÅÀPÄWPPPP`ntx ¤ ÆBVÅ{ ¤ ÇUÆ ¤ ÈÇ@ ¤ ÉPÄWPuPPP|Pƒ¾Á ¤ ÊBaÉ{ ¤ ËUÊ ¤ Ì?ÈË@ ¤ ÍÀÀ ¤ Îf l-6cff15a80cd23e5-106¤ Ïf l-6cff15a80cd23e5-107¤ ÐÎÏ ¤ ÑG‹ÍÐ ¤ ÒÀÑPÄWPPPP`ntx
¤ ÓBˆÒ{ ¤ ÔB“Ò{ ¤ Õ[ÑPÄ ¤ ÖBnÕ ¤ ×ÔÖ ¤ Ø× ¤ ÙB™É{ ¤ ÚUÙ ¤ Û?ÈÚ@ ¤ Üf l-6cff15a80cd23e5-10b¤ Ýf l-6cff15a80cd23e5-10c¤ ÞÜÝ ¤ ßG‹ÍÞ ¤ àÀßPÄWPPPP`ntx
¤ áBˆà{ ¤ âB“à{ ¤ ãßPÄ ¤ äB ã ¤ åâä ¤ æå ¤ çB¨É{ ¤ èUç ¤ é?Èè@ ¤ êf l-6cff15a80cd23e5-110¤ ëf l-6cff15a80cd23e5-111¤ ìêë ¤ íG‹Íì ¤ îÀíPÄWPPPP`ntx
¤ ïBˆî{ ¤ ðB“î{ ¤ ñ[íPÄ ¤ òBîñ ¤ óðò ¤ ôó ¤ õg t-6cff15a80cd23e5-100¤ öõ ¤ ÷f l-6cff15a80cd23e5-115¤ ø÷ ¤ ùGöÁø ¤ úÀùPÄWPPPP`ntx
¤ ûBCú{ ¤ üùPÄWPuPPP|Pƒ¾Á ¤ ýBŠü{ ¤ þý ¤ ÿBÂü{ ¤ BDü{ ¤ BFü{ ¤ ý ¤ [ùPÄ ¤ Bn ¤ ¤ BÊü{ ¤ ùPÄ ¤ B ¤ ý ¤
BPü{ ¤ B“ü{ ¤ B½ ¤
¤
ý
¤ ÿ ¤ ûþ ¤ [PÄ ¤ B¾ ¤ g m-6cff15a80cd23e5-11c¤ E ¤ ¤ f l-6cff15a80cd23e5-121¤ f l-6cff15a80cd23e5-122¤ f l-6cff15a80cd23e5-123¤ f l-6cff15a80cd23e5-124¤ f l-6cff15a80cd23e5-125¤ ¤ G8 ¤ ¤ f l-6cff15a80cd23e5-11e¤ ¤ GR ¤ ! P WPRPPPW¾Á
¤ "B4!{ ¤ #[ P ¤ $Bn# ¤ %Bº# ¤ &B# ¤ 'Bg# ¤ (B½# ¤ )%&'( ¤ *g set-coop-repl-read-thunk!¤ +g $%set-coop-repl-read-thunk!-procedure¤ ,g m-6cff15a80cd23e5-130¤ -,E ¤ .g t-6cff15a80cd23e5-12e¤ /g t-6cff15a80cd23e5-12f¤ 0./ ¤ 1-- ¤ 2f l-6cff15a80cd23e5-135¤ 3f l-6cff15a80cd23e5-136¤ 423 ¤ 5G014 ¤ 6- ¤ 7f l-6cff15a80cd23e5-132¤ 87 ¤ 9GR68 ¤ :-5P9WPPPP`ntx
¤ ;BC:{ ¤ <= ¤ ?g m-1e8ba8b5a-3e8¤ @?E ¤ A@@ ¤ Bf l-1e8ba8b5a-3ec¤ Cf l-1e8ba8b5a-3ed¤ DBC ¤ EG>AD ¤ Fg setter¤ GcvF ¤ Hf l-1e8ba8b5a-3e0¤ If l-1e8ba8b5a-3e1¤ Jf l-1e8ba8b5a-3e2¤ KHIJ ¤ LGG~K ¤ M1w ¤ Nf l-1e8ba8b5a-3d7¤ Of l-1e8ba8b5a-3d8¤ PNO ¤ QGM\P ¤ Rg field-specs¤ S R ¤ Tf l-1e8ba8b5a-3d3¤ Uf l-1e8ba8b5a-3d4¤ VTU ¤ WGS\V ¤ X5P9WPELPQPW¾Á ¤ YBŠX{ ¤ Zg val¤ [BZX{ ¤ \Y[ ¤ ]BÂX{ ¤ ^BDX{ ¤ _BFX{ ¤ `_Y ¤ a[5P9 ¤ bBna ¤ c^`b ¤ dg struct-set!¤ eBdX{ ¤ f5P9 ¤ gB f ¤ heYg[ ¤ iBPX{ ¤ jB“X{ ¤ kB*a ¤ ljk ¤ miYl ¤ n]chm ¤ o;\n ¤ p[P9 ¤ qB+p ¤ rg set-coop-repl-cont!¤ sg %set-coop-repl-cont!-procedure¤ tg m-6cff15a80cd23e5-140¤ utE ¤ vg t-6cff15a80cd23e5-13e¤ wg t-6cff15a80cd23e5-13f¤ xvw ¤ yuu ¤ zf l-6cff15a80cd23e5-145¤ {f l-6cff15a80cd23e5-146¤ |z{ ¤ }Gxy| ¤ ~u ¤ f l-6cff15a80cd23e5-142¤ € ¤ GR~€ ¤ ‚u}PWPPPP`ntx
¤ ƒBC‚{ ¤ „}PWPELPQPW¾Á ¤ …BŠ„{ ¤ †BZ„{ ¤ ‡…† ¤ ˆB„{ ¤ ‰BD„{ ¤ ŠBF„{ ¤ ‹Š… ¤ Œ[}P ¤ BnŒ ¤ Ž‰‹ ¤ Bd„{ ¤ }P ¤ ‘B ¤ ’…‘† ¤ “BP„{ ¤ ”B“„{ ¤ •BrŒ ¤ –”• ¤ —“…– ¤ ˜ˆŽ’— ¤ ™ƒ‡˜ ¤ š[P ¤ ›Bsš ¤ œg make-condition-variable¤ g make-coop-repl¤ žg wait-condition-variable¤ Ÿg error¤ f 2coop-repl-read: condvar signaled, but thunk is #f!¤ ¡g coop-repl-read¤ ¢g coop-repl-prompt¤ £g store-repl-cont¤ ¤g *repl-stack*¤ ¥g current-module¤ ¦f "coop-reader: read-thunk is not #f!¤ §g signal-condition-variable¤ ¨g make-coop-reader¤ ©g eval¤ ªg reader-loop¤ «g q-empty?¤ ¬g deq!¤ Ÿ ¤ ®Ÿ ¤ ¯f no matching pattern¤ °g new-repl¤ ±g start-repl-client¤ ²g catch¤ ³² ¤ ´² ¤ µg call-with-new-thread¤ ¶µ ¤ ·µ ¤ ¸g %thread-handler¤ ¹¸ ¤ º¸ ¤ »g current-language¤ ¼g start-coop-repl¤ ½g make-coop-client-proc¤ ¾g run-coop-repl-server¤ ¿g
close-fdes¤ Àg fileno¤ Ág with-continuation-barrier¤ Âg current-input-port¤ Ãg current-output-port¤ Äg current-error-port¤ Åg current-warning-port¤ Æg
parameter?¤ ÇÆ ¤ ÈÆ ¤ Ég scm-error¤ Êg wrong-type-arg¤ Ëf parameterize¤ Ìf Not a parameter: ~S¤ Íg save-module-excursion¤C 5 hÐ` ]4
-.15 44 > " G 5 h ¢ ] ¨ C š g mutex
g queue g filenamef system/repl/coop-server.scmŒ
$
ŒŒ g nameg !%%make-coop-repl-server-procedureŒ C6R49:;>AÇ h \ ] C T g t-6cff15a80cd23e5-3
g t-6cff15a80cd23e5-4 CÉÌ:Í h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ$
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ $
ŒŒ
CÒ h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
$
ŒŒ n C5:RØÙÜ5ݨ 4à 5> " G ã–6iª 5R5 h ˆ ] ¦$ §‚CC € g obj
g filenamef system/repl/coop-server.scmŒ
$
ŒŒ g nameg %coop-repl-server?-procedureŒ CäR49å;>æM h < ] C 4 g t-6cff15a80cd23e5-13
CÉÌåÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ$
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ $
ŒŒ
CO h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
$
ŒŒ n C5åR5RS h ‹ ] §&
©C 6ƒ g s
g filenamef system/repl/coop-server.scmŒ
$
ŒŒ g nameg !%coop-repl-server-mutex-procedureŒ CTR49S;>‡’˜ h : ]ŒŒC 2 g err
g s Cœ¢§ h : ]ŒŒC 2 g err
g s C«±· h : ]ŒŒC 2 g err
g s CæÕ h < ] C 4 g t-6cff15a80cd23e5-1f
CÉÌSÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ$
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ $
ŒŒ
C× h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
$
ŒŒ ³ C5SR5RØ h ‹ ] §& ©C 6ƒ g s
g filenamef system/repl/coop-server.scmŒ
$
ŒŒ g nameg !%coop-repl-server-queue-procedureŒ CÙR49Ø;>çîó h : ]ŒŒC 2 g err
g s Cöü h : ]ŒŒC 2 g err
g s C
h : ]ŒŒC 2 g err
g s Cæ+ h < ] C 4 g t-6cff15a80cd23e5-3a
CÉÌØÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ$
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ $
ŒŒ
C- h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
$
ŒŒ ³ C5ØR49³;>3Y[^ab h v ]45ŒŒŒŒŒC n g dummy
g check? g s g getter g expr CÔÕ h( É ] 4 5 $ @ 6 Á g x
" g tmp " g filenamef system/repl/coop-server.scmŒ
$
ŒŒ " g
macro-typeg syntax-rulesŒg patternsg check?g sg getterg expr g ... C5³Rcd5 h ]45 45 ¨ C ¥ g mutex
g queue g filenamef system/repl/coop-server.scmŒ
*
ŒŒ + ŒŒ + 'ŒŒ + ŒŒ
g nameg make-coop-repl-serverŒ CeR5RSh h N ] L 6F g filenamef system/repl/coop-server.scmŒ
0 ŒŒ
Ck h N ] L 6F g filenamef system/repl/coop-server.scmŒ
0 ŒŒ
ClØ h ¤ - 1 3 §&
©" 4 5 O O 4O > " G V4 §& ©" 4 5Œ> X4O > " G CX4O > " G F œ g coop-server
ž g opcode ž g args ž g x # ž g filenamef system/repl/coop-server.scmŒ
-
ŒŒ 0 ŒŒ # 0 ŒŒ J 1 ŒŒ O 1
ŒŒ k 2
ŒŒ p 1 ŒŒ r 0 ŒŒ ž
g nameg coop-repl-server-evalŒg
documentationf Queue a new instruction with the symbolic name OPCODE and an arbitrary
number of arguments, to be processed the next time COOP-SERVER is polled.Œ CmRn h  ] ¨ Cº g mutex
g condvar g thunk g cont g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %%make-coop-repl-procedureŒ CoR49p;>q– h ¢ ] Cš g t-6cff15a80cd23e5-8d
g t-6cff15a80cd23e5-8e g t-6cff15a80cd23e5-8f g t-6cff15a80cd23e5-90 CÉÌpÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C˜ h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
4
ŒŒ n C5pRØ™Ünš¨ 4à n> " G ã–oiª nRn h ] ¦$ §‚CC y g obj
g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %coop-repl?-procedureŒ C›R49œ;>æ· h < ] C 4 g t-6cff15a80cd23e5-a3
CÉÌœÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C¹ h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
4
ŒŒ n C5œRnRº h „ ] §&
©C 6| g s
g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %coop-repl-mutex-procedureŒ C»R49º;>ÉÐÕ h : ]ŒŒC 2 g err
g s CØÞã h : ]ŒŒC 2 g err
g s Cæìò h : ]ŒŒC 2 g err
g s Cæ h < ] C 4 g t-6cff15a80cd23e5-af
CÉÌºÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
4
ŒŒ ³ C5ºRnR h † ] §& ©C 6~ g s
g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %coop-repl-condvar-procedureŒ CR49;> ', h : ]ŒŒC 2 g err
g s C/5: h : ]ŒŒC 2 g err
g s C=CH h : ]ŒŒC 2 g err
g s Cæd h < ] C 4 g t-6cff15a80cd23e5-ca
CÉÌÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
Cf h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
4
ŒŒ ³ C5RnRg h ‰ ] §& ©C 6 g s
g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %coop-repl-read-thunk-procedureŒ ChR49g;>v}‚ h : ]ŒŒC 2 g err
g s C…‹ h : ]ŒŒC 2 g err
g s C“™ž h : ]ŒŒC 2 g err
g s Cæº h < ] C 4 g t-6cff15a80cd23e5-e5
CÉÌgÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C¼ h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
4
ŒŒ ³ C5gRnR½ h ƒ ] §& ©C 6 { g s
g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %coop-repl-cont-procedureŒ C¾R49½;>ÌÓØ h : ]ŒŒC 2 g err
g s CÛáæ h : ]ŒŒC 2 g err
g s Céïô h : ]ŒŒC 2 g err
g s Cæ h = ] C 5 g t-6cff15a80cd23e5-100
CÉÌ½Í h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C h ] C
CÔÕ h¸ Ë ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 Ã g x
³ g tmp ³ g tmp " ³ g tmp 9 ³ g tmp P ³ g tmp g ³ g tmp ƒ ³ g filenamef system/repl/coop-server.scmŒ
4
ŒŒ ³ C5½R49î;>3"$)ab h v ]45ŒŒŒŒŒC n g dummy
g check? g s g getter g expr CÔÕ h( É ] 4 5 $ @ 6 Á g x
" g tmp " g filenamef system/repl/coop-server.scmŒ
4
ŒŒ " g
macro-typeg syntax-rulesŒg patternsg check?g sg getterg expr g ... C5îRnR* h Ÿ ] §& ªC 6 — g s
g val g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg $%set-coop-repl-read-thunk!-procedureŒ C+R49*;>Ao h ` ] C X g t-6cff15a80cd23e5-12e
g t-6cff15a80cd23e5-12f CÉÌ*Í h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
Cq h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
4
ŒŒ n C5*RnRr h ™ ] §& ªC 6 ‘ g s
g val g filenamef system/repl/coop-server.scmŒ
4
ŒŒ g nameg %set-coop-repl-cont!-procedureŒ CsR49r;>A™ h ` ] C X g t-6cff15a80cd23e5-13e
g t-6cff15a80cd23e5-13f CÉÌrÍ h ^ ]L 6 V g a
g filenamef system/repl/coop-server.scmΠ4
ŒŒ C?Ð h N ] L 6F g filenamef system/repl/coop-server.scmŒ 4
ŒŒ
C› h ] C
CÔÕ hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 ‡ g x
n g tmp n g tmp " n g tmp > n g filenamef system/repl/coop-server.scmŒ
4
ŒŒ n C5rRcœn h ¨ ]45 45 ¨ C g mutex
g condvar g filenamef system/repl/coop-server.scmŒ
<
ŒŒ = ŒŒ = ŒŒ = ŒŒ
g nameg make-coop-replŒ CRnRºh h N ] L 6F g filenamef system/repl/coop-server.scmŒ
B ŒŒ
Ck h N ] L 6F g filenamef system/repl/coop-server.scmŒ
B ŒŒ
CgžŸ * h0 ¡ ] §&
©" 4 5 O O 4O > " G V §& ©" 4 5$ " D4 §& ©" 4 5 §&
©" 4 5> " G §& ©" 4 5 $ " 4
> " G §& ª" 4 > " G X4O > " G 6 ™ g coop-repl
. g x ( g thunk Ä g thunk ( . g filenamef system/repl/coop-server.scmŒ
?
ŒŒ B ŒŒ B ŒŒ E C ŒŒ a C ŒŒ f D
ŒŒ k D &ŒŒ … E &ŒŒ ¡ D
ŒŒ ¬ F ŒŒ Ä F ŒŒ Ì G
ŒŒ Ñ H ŒŒ Õ H ŒŒ Ú H ŒŒ å I
ŒŒ B ŒŒ ( A ŒŒ . K ŒŒ . g nameg coop-repl-readŒg
documentationf 5Read an expression via the thunk stored in COOP-REPL.Œ C¡Rn¢ h V ] LL 6N g filenamef system/repl/coop-server.scmŒ
R ŒŒ R %ŒŒ
C h h ] L O 6 ` g exp
g filenamef system/repl/coop-server.scmŒ
P ŒŒ Q ŒŒ CRr h å ]§&
O ªC6Ý g cont
g coop-repl g filenamef system/repl/coop-server.scmŒ
M
ŒŒ O ŒŒ g nameg store-repl-contŒg
documentationf 4Save the partial continuation CONT within COOP-REPL.Œ C£R£¢ h ] L 6
C h0 ] U 4 O > XCXFG @ ü g thunk
) g handler ) g args ) g filenamef system/repl/coop-server.scmŒ
T
ŒŒ V ŒŒ V ŒŒ
V ŒŒ ) g nameg coop-repl-promptŒg
documentationf 2Apply THUNK within a prompt for cooperative REPLs.Œ C¢R¤¥¤2! h( ^ ] L Y4L> " G 4L> ZCZFV g filenamef system/repl/coop-server.scmŒ
b
ŒŒ d ŒŒ e ŒŒ (
CnRºh h N ] L 6F g filenamef system/repl/coop-server.scmŒ
f ŒŒ
Ck h N ] L 6F g filenamef system/repl/coop-server.scmŒ
f ŒŒ
CgŸ¦*§¢ h D ][45 O L §& L
©" 4L 5 O O 4O > " G VL §& L ©" 4L 5$ 4
> " G " L §& L ª" 4L > " G 4
L §& L ©" 4L 5> " G X4O > " G L WF < g repl
g stack
g module
g
read-thunk g x ; g filenamef system/repl/coop-server.scmŒ
\ ŒŒ a ŒŒ
` ŒŒ ] ŒŒ $ f ŒŒ ; f ŒŒ d g ŒŒ € g ŒŒ h
ŒŒ … h ŒŒ Š h
ŒŒ ™ i ŒŒ À j ŒŒ Å j #ŒŒ á j ŒŒ ë f ŒŒ k ŒŒ k ŒŒ
C h S ] O C K g coop-repl
g filenamef system/repl/coop-server.scmŒ
X
ŒŒ
g nameg make-coop-readerŒg
documentationf »Return a new procedure for reading user input from COOP-REPL. The
generated procedure passes the responsibility of reading input to
another thread and aborts the cooperative REPL prompt.Œ C¨Rm©¡ª h( S ]4 45> " G 6 K g coop-server
' g coop-repl ' g filenamef system/repl/coop-server.scmŒ
m
ŒŒ p ŒŒ p %ŒŒ q ŒŒ p ŒŒ ' r ŒŒ ' g nameg reader-loopŒg
documentationf Run an unbounded loop that reads an expression for COOP-REPL and
stores the expression within COOP-SERVER for later evaluation.Œ CªR5RSh h N ] L 6F g filenamef system/repl/coop-server.scmŒ
y ŒŒ
Ck h N ] L 6F g filenamef system/repl/coop-server.scmŒ
y ŒŒ
CØ«¬©n½®¯°± h Ë ]1 §&
©" 4 5 O O 4O > " G V §& ©" 4 5 45$ " 45 X4O > " G $ }" ˆ$ èŽ & ³ˆ$ Ž ˆ$ [Ž( 7 4§
& ©" 4 5> " G " 44
5> " ðG " é44
5> " ÓG " Ì 44
5> " °G " ©44
5> " “G " Œ 44
5> " pG " iˆ$ ^Ž & >ˆ$ /Ž( 4 > " G " "ÿþ©" "ÿþ¡" "ÿþ™ " "ÿþ‹" CÃ g coop-server
g x ‘ g queue \ x g op ‘ g w ª Œ g x ª Œ g w à L g x à L g w Ø g w ¶
g x ¶
g w Ó ì g filenamef system/repl/coop-server.scmŒ
t
ŒŒ y ŒŒ y ŒŒ E z ŒŒ \ z ŒŒ _ { ŒŒ i { ŒŒ o | ŒŒ z y ŒŒ ‘ y ŒŒ ™ } ŒŒ ~ ŒŒ Û ‚ ŒŒ
~ ŒŒ Ö € ŒŒ ô ~ ŒŒ g nameg poll-coop-repl-serverŒg
documentationf îPoll the cooperative REPL server COOP-SERVER and apply a pending
operation if there is one, such as evaluating an expression typed at the
REPL prompt. This procedure must be called from the same thread that
called spawn-coop-repl-server.Œ C0R´·ª h O ] LL 6 G g filenamef system/repl/coop-server.scmŒ
Œ ŒŒ
Cº »¨ h8 ]45 4 L O > " G 45 4 56 • g coop-repl
5 g filenamef system/repl/coop-server.scmŒ
Š ŒŒ ‹ ŒŒ ‹ ŒŒ
Œ ŒŒ ' ŒŒ - (ŒŒ 5 ŒŒ 5
C h d - 1 3 C \ g args
g filenamef system/repl/coop-server.scmŒ
Š ŒŒ
C h Ø ] O 6Ð g coop-server
g filenamef system/repl/coop-server.scmŒ
…
ŒŒ Š ŒŒ g nameg start-coop-replŒg
documentationf 5Start a new cooperative REPL process for COOP-SERVER.Œ C¼R&½ h ]4 56 g coop-server
g
server-socket g filenamef system/repl/coop-server.scmŒ
ŒŒ ’ ŒŒ ’ ŒŒ g nameg run-coop-repl-serverŒg
documentationf QStart the cooperative REPL server for COOP-SERVER using the socket
SERVER-SOCKET.Œ C¾R'e·¾ h O ] LL 6 G g filenamef system/repl/coop-server.scmŒ
› ŒŒ
Cº h@ Û - . , 3 # 45 45 4 O > " G C Ó g
server-socket
> g coop-server > g filenamef system/repl/coop-server.scmŒ
”
ŒŒ • $ŒŒ š ŒŒ š ŒŒ ! › ŒŒ >
g nameg spawn-coop-repl-serverŒg
documentationf ûCreate and return a new cooperative REPL server object, and spawn a
new thread to listen for connections on SERVER-SOCKET. Proper
functioning of the REPL server requires that poll-coop-repl-server be
called periodically on the returned server object.Œ C/Rm° h ˆ ]L 6 € g client
g addr g filenamef system/repl/coop-server.scmŒ
£ ŒŒ ¤ 'ŒŒ ¤ ŒŒ C h ] O C ÿ g coop-server
g filenamef system/repl/coop-server.scmŒ
ŒŒ
g nameg make-coop-client-procŒg
documentationf gReturn a new procedure that is used to schedule the creation of a new
cooperative REPL for COOP-SERVER.Œ C½R(¿À h a ] 4L 56 Y g filenamef system/repl/coop-server.scmŒ
® ŒŒ ® 2ŒŒ
® &ŒŒ
C*Á¢ÂÃÄÅÈÉÊË̤ͼ h X ] L 6P g filenamef system/repl/coop-server.scmŒ
¼
ŒŒ ½ ŒŒ
C´) h X ] L 6P g filenamef system/repl/coop-server.scmŒ
 ŒŒ à ŒŒ
C h d - 1 3 C \ g args
g filenamef system/repl/coop-server.scmŒ
 ŒŒ
C h0 ] 4 5$ " 4 > " G 45$ " 4 > " G 45$ " 4 > " G 45$ " 4 > " G © © © ©4 ©L54 ©L54 ©L54 ©L5Y
Y4 L O > " G ZZ
LO 6ÿ g t-6cff15a80cd23e5-300
" g t-6cff15a80cd23e5-301
" g t-6cff15a80cd23e5-302
" g t-6cff15a80cd23e5-303
" g filenamef system/repl/coop-server.scmŒ
µ ŒŒ
¶ ŒŒ û º &ŒŒ þ » ŒŒ 0  ŒŒ 0
C h X ] L LO 6 P g filenamef system/repl/coop-server.scmŒ
³ ŒŒ ´ ŒŒ
C h@ 8 ]4O > " G 4> " G O 6 0 g coop-server
: g client : g filenamef system/repl/coop-server.scmŒ
¦
ŒŒ ® ŒŒ ° ŒŒ : ² ŒŒ : g nameg start-repl-clientŒg
documentationf mRun a cooperative REPL for COOP-SERVER within a prompt. All input
and output is sent over the socket CLIENT.Œ C±RC g m
, g rtd
É ñ g rtd
m — g filenamef system/repl/coop-server.scmŒ
ŒŒ õ $
ŒŒ 1 *
ŒŒ h -
ŒŒ N 4
ŒŒ =L <
ŒŒ A ?
ŒŒ C9 M
ŒŒ D¸ T
ŒŒ J X
ŒŒ K· m
ŒŒ Q¦ t
ŒŒ TŒ …
ŒŒ UÑ
ŒŒ X~ ”
ŒŒ Z[
ŒŒ `Ì ¦
ŒŒ `Î
C6 PK ! eÒRJMD MD server.gonu „[µü¤ PK ! ”Á)?d' d' †D error-handling.gonu „[µü¤ PK ! Cõãŵ³ µ³
+l command.gonu „[µü¤ PK ! ©'Çfã, ã, repl.gonu „[µü¤ PK ! <5§^7 7 4M common.gonu „[µü¤ PK ! <67y, y, ˆ„ debug.gonu „[µü¤ PK ! €L¼W:Å :Å 9± coop-server.gonu „[µü¤ PK
±v