(let/cc ret (when (= y 0) (ret nil) (/ x y))
#lang racket (define (division x y) (let/cc return (when (= y 0) (return null)) (/ x y)))
Reply on news.ycombinator.com