// BCPLIOX - BCPL Compiler-- io definitions
// Copyright Xerox Corporation 1980
// Remove SWA...ime<SWINEHART>BCPLIOX.;2     3-APR-75 13:01:37    EDIT BY SWINEHART
// Gene Mcdaniel  change  maxwordindex (smaller). 1 oct 74

manifest [
  maxwordindex = 5
  maxbyteindex = maxwordindex*2 + 1
  maxstreambytes = maxbyteindex + 1
  readact = 0
  writeact = 1
  ]

structure STREAM[
    channel word
    action word
    count word
    max word
    [ bytebuffer↑0,maxbyteindex byte 1] =
    [ wordbuffer↑0,maxwordindex word 1]
]
structure [ LEFTHALF byte 1; RIGHTHALF byte 1 ]

manifest
[ sysgchar = #67400
  syspchar = #70000
  sysopen =  #74077
  sysclose = #74477
  syscreate= #60000
  sysdelete= #60400
  sysrds   = #75077
  syswrs   = #76477
  sysrename = #61000

]


manifest [
 syscallproc = #101000
 sysdebugproc = #101001
 sysac  = #1002
 systemp1 = #1006
 systemp2 = #1007
   ]

manifest
  [
  diskstream = 1
  ]