if (FALSE) {
## A small fragment of the dos.library BMAP would look like this:
dos.bmap <- as.AmigaBasicBMAP(list(
xOpen = list(
libraryVectorOffset = -30,
registers = as.raw(2:3)
),
xClose = list(
libraryVectorOffset = -36,
registers = as.raw(2)
),
xRead = list(
libraryVectorOffset = -42,
registers = as.raw(2:4)
)
))
## The raw representation would be
dos.bmap.raw <- as.raw(dos.bmap)
## And the reverse
rawToAmigaBasicBMAP(dos.bmap.raw)
}
Run the code above in your browser using DataLab