2007-10-11 21:28:08 -04:00
|
|
|
|
|
|
|
|
(library (ikarus codecs)
|
2007-10-11 21:47:11 -04:00
|
|
|
(export latin-1-codec utf-8-codec utf-16-codec native-eol-style)
|
2007-10-11 21:28:08 -04:00
|
|
|
(import (rnrs base))
|
|
|
|
|
(define (latin-1-codec) 'latin-1-codec)
|
|
|
|
|
(define (utf-8-codec) 'utf-8-codec)
|
2007-10-11 21:47:11 -04:00
|
|
|
(define (utf-16-codec) 'utf-16-codec)
|
|
|
|
|
(define (native-eol-style) 'none))
|
2007-10-11 21:28:08 -04:00
|
|
|
|
