View difference between Paste ID: k8jCbenF and UyFwXGCt

 (import  (sortsmillff pure)
          (sortsmillff python))
 
-(pure-eval
+(define pure-result
- #«
+  (pure-eval
- using system;
+   #«
- fprintf stderr "This is a test\nof embedded Pure code.\n" ();
+   using system;
- »#)
+   fprintf stderr "This is a test\nof embedded Pure code.\n" ();
    reverse [1, 2, 3, 4, 5];
    »#))
 
 (format (current-error-port) "pure-result = ~a\n" pure-result)
 
 (format (current-error-port) "1 + 2/3 = ~a\n"
         (pure-expr->number
          (pure-eval #« using math; 1 + 2%3 »#)))
 
 (PyRun_SimpleString
  (string->pointer
 #«
 import sys
 print "This is a test\nof embedded Python code."
 print globals ()
 »#
 ))