On ##sys#print added by mario-goulart on Thu Dec 8 19:20:17 2011

;; Chicken

(define devnull (open-output-file "/dev/null"))

(define (doit)
  (let loop ((i 100000))
    (unless (eq? i 0)
      (display "foo" devnull)
      (loop (fx- i 1)))))

(doit)



## Python

devnull = open('/dev/null', 'w')

def doit():
    i = 100000
    while i != 0 :
        devnull.write('foo')
        i -= 1

doit()