deadb17 / ob-racket Goto Github PK

In the racket-mode REPL I'm able to see the images produced by my code. The following is my output when evaluating the same code in an org-mode buffer. Is this a limitation of org-mode itself?

#+begin_src racket :lang htdp/bsl
(require 2htdp/image)

(rectangle 10 20 "solid" "red")
(rectangle 20 10 "solid" "blue")
(define I1 (rectangle 10 20 "solid" "red"))
(define I2 (rectangle 20 10 "solid" "blue"))
(if (< (image-width I1)
       (image-width I2))
       "tall"
       "wide")
#+end_src

#+RESULTS:
: #<image>
: #<image>
: "tall"

I've got your basic install and have tested everything. But now I'd like to use this . I basically have no idea how to install/load the two files

(require "mk.rkt")

and

(load "test-all.scm")

to run the tests. I can start a racket REPL and just put these in as is and they work, but how to get that last (load "test-all.scm") to run in a source block?