whalesong/tests/more-tests/isolating-bug.expected
2011-09-27 17:24:05 -04:00

28 lines
711 B
Plaintext

#<struct-type:swf>
#<procedure:make-swf>
#<procedure:swf?>
#<procedure:swf-f>
#<procedure:set-swf-f!>
in the result of call-with-values
(#<struct-type:swf> #<procedure:make-swf> #<procedure:swf?> #<procedure:swf-f> #<procedure:set-swf-f!>)
---
#<struct-type:swf>
#<procedure:make-swf>
#<procedure:swf?>
#<procedure:swf-f>
#<procedure:set-swf-f!>
***
#<struct-type:swf2>
#<procedure:make-swf2>
#<procedure:swf2?>
#<procedure:swf2-f>
#<procedure:set-swf2-f!>
in the result of call-with-values
(#<struct-type:swf2> #<procedure:make-swf2> #<procedure:swf2?> #<procedure:swf2-f> #<procedure:set-swf2-f!>)
---
#<struct-type:swf2>
#<procedure:make-swf2>
#<procedure:swf2?>
#<procedure:swf2-f>
#<procedure:set-swf2-f!>