4 lines
133 B
Racket
4 lines
133 B
Racket
#lang racket/base
|
|
|
|
(printf "Word size: ~a\n" (system-type 'word))
|
|
(printf "Endianness: ~a\n" (if (system-big-endian?) 'big 'little))
|