; Copyright (c) 1993-2008 by Richard Kelsey and Jonathan Rees. See file COPYING.

; Just enough to support the linker

(define (call-atomically thunk)
  (thunk))
(define atomically values)
(define provisional-car car)
(define provisional-set-car! set-car!)
