Language 84

File

language84-0.7/chunk.84

{
:global
:new_rw
:new_ro

:size

:store_bytes
:fetch_bytes_ro
:fetch_bytes_rw

:store_byte store_uint8
:fetch_byte fetch_uint8

:store_uint8
:fetch_uint8

:store_uint16 store_uint16_le
:fetch_uint16 fetch_uint16_le

:store_uint16_le
:fetch_uint16_le

:store_uint32 store_uint32_le
:fetch_uint32 fetch_uint32_le

:store_uint32_le
:fetch_uint32_le

:store_uint64 store_uint64_le
:fetch_uint64 fetch_uint64_le

:store_uint64_le
:fetch_uint64_le

:store_int8
:fetch_int8

:store_int16 store_int16_le
:fetch_int16 fetch_int16_le

:store_int16_le
:fetch_int16_le

:store_int32 store_int32_le
:fetch_int32 fetch_int32_le

:store_int32_le
:fetch_int32_le

:store_int64 store_int64_le
:fetch_int64 fetch_int64_le

:store_int64_le
:fetch_int64_le
}

Where

Define (global i)
    (Prim chunk_global i)

Define (new_rw num_bytes)
    (Prim chunk_new_rw num_bytes)

Define (new_ro num_bytes init_command)
    (Prim chunk_new_ro num_bytes init_command)

Define (size chunk)
    (Prim chunk_size chunk)

Define (store_bytes d d_start s s_start s_count)
    (Prim chunk_store_bytes d d_start s s_start s_count)

Define (fetch_bytes_ro chunk start count)
    (Prim chunk_fetch_bytes_ro chunk start count)

Define (fetch_bytes_rw chunk start count)
    (Prim chunk_fetch_bytes_rw chunk start count)

Define (store_uint8 chunk i n)
    (Prim chunk_store_uint8 chunk i n)

Define (fetch_uint8 chunk i)
    (Prim chunk_fetch_uint8 chunk i)

Define (store_uint16_le chunk i n)
    (Prim chunk_store_uint16_le chunk i n)

Define (fetch_uint16_le chunk i)
    (Prim chunk_fetch_uint16_le chunk i)

Define (store_uint32_le chunk i n)
    (Prim chunk_store_uint32_le chunk i n)

Define (fetch_uint32_le chunk i)
    (Prim chunk_fetch_uint32_le chunk i)

Define (store_uint64_le chunk i n)
    (Prim chunk_store_uint64_le chunk i n)

Define (fetch_uint64_le chunk i)
    (Prim chunk_fetch_uint64_le chunk i)

Define (store_int8 chunk i n)
    (Prim chunk_store_int8 chunk i n)

Define (fetch_int8 chunk i)
    (Prim chunk_fetch_int8 chunk i)

Define (store_int16_le chunk i n)
    (Prim chunk_store_int16_le chunk i n)

Define (fetch_int16_le chunk i)
    (Prim chunk_fetch_int16_le chunk i)

Define (store_int32_le chunk i n)
    (Prim chunk_store_int32_le chunk i n)

Define (fetch_int32_le chunk i)
    (Prim chunk_fetch_int32_le chunk i)

Define (store_int64_le chunk i n)
    (Prim chunk_store_int64_le chunk i n)

Define (fetch_int64_le chunk i)
    (Prim chunk_fetch_int64_le chunk i)