;;;; slib-compat.scm


(define (output-port-width port) 80)
(define (output-port-height port) 25)

(define (provided? x)
  (memq x '(inexact)))

(define slib:error error)