(:export "LONG" "UNSIGNED-LONG" "INT" "UNSIGNED-INT" "SHORT" "UNSIGNED-SHORT"
"SIGNED" "UNSIGNED" "CHAR" "POINTER" "COPY-OF")
(:export "LOCATION" "ALLOCATION" "DIRECT-SLOTS" "READER-FUNCTION"
(:export "LONG" "UNSIGNED-LONG" "INT" "UNSIGNED-INT" "SHORT" "UNSIGNED-SHORT"
"SIGNED" "UNSIGNED" "CHAR" "POINTER" "COPY-OF")
(:export "LOCATION" "ALLOCATION" "DIRECT-SLOTS" "READER-FUNCTION"