diff --git a/examples/ffi/sub-bignums.scm b/examples/ffi/sub-bignums.scm
index 1a15d2b7..87092c61 100644
--- a/examples/ffi/sub-bignums.scm
+++ b/examples/ffi/sub-bignums.scm
@@ -9,9 +9,9 @@
 
 (c-define sub-big-nums bignum "sub_big_nums" opaque bignum bignum)
 
-(write
+(display
   (sub-big-nums 
      (current-thread-data)
      999999999999999999999999
-     222222222222222222222222
-     ))
+     222222222222222222222222))
+(newline)