Return to esp.fs CVS log

Up to [Qemu by Fabrice Bellard] / qemu / roms / openbios / drivers

qemu 1.0.1

\ -------------------------------------------------------------------------
\ SCSI encode/decode unit
\ -------------------------------------------------------------------------

: decode-unit-scsi ( str len -- id lun )
  ascii , left-split
  ( addr-R len-R addr-L len-L )
  parse-hex
  -rot parse-hex
  swap
;

: encode-unit-scsi ( id lun -- str len)
  swap
  pocket tohexstr
  " ," pocket tmpstrcat >r
  rot pocket tohexstr r> tmpstrcat drop
;

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.