DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦e98cd1971⟧ TextFile

    Length: 2304 (0x900)
    Types: TextFile
    Names: »trcorout4tx «

Derivation

└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
    └─⟦75ff9bef3⟧ 
        └─⟦this⟧ »trcorout4tx « 

TextFile

mode list.yes

clear user,
  coroutlib,
  testprint,
  centralogic,
  coroutines,
  allocate,
  wait,
  signal,
  initref,
  cortosem,
  schedule,
  setpriority,
  preparetest,
  waittime,
  cotime,
  co8000event,
  coownbase,
  selecttest,
  cotimebase,
  waitselect


coroutines=set 1 disc1
(coroutines=slang corout4tx
  coroutines,
  allocate,
  wait,
  signal,
  initref,
  cortosem,
  schedule,
  setpriority,
  preparetest,
  waittime,
  cotime,
  co8000event,
  coownbase,
  selecttest,
  cotimebase,
  waitselect)

centralogic=set 1 disc1
centralogic=algol centrlog4tx

testprint=set 1 disc1
testprint=algol testpr4tx

coroutlib=set 1 disc1
coroutlib=algol
external
  procedure coroutlib;
  write (out, <:
  testprint,
  centralogic,
  coroutines,
  allocate,
  wait,
  signal,
  initref,
  cortosem,
  schedule,
  setpriority,
  preparetest,
  waittime,
  cotime,
  co8000event,
  coownbase,
  selecttest,
  cotimebase,
  waitselect
  :>, "nl", 1);
end;

scope user,
  coroutlib,
  testprint,
  centralogic,
  coroutines,
  allocate,
  wait,
  signal,
  initref,
  cortosem,
  schedule,
  setpriority,
  preparetest,
  waittime,
  cotime,
  co8000event,
  coownbase,
  selecttest,
  cotimebase,
  waitselect

  if ok.no
  (message scope user ok.no
   end)

coroutlib=compresslib coroutines centralogic testprint

lookup,
  coroutlib,
  testprint,
  centralogic,
  coroutines,
  allocate,
  wait,
  signal,
  initref,
  cortosem,
  schedule,
  setpriority,
  preparetest,
  waittime,
  cotime,
  co8000event,
  coownbase,
  selecttest,
  cotimebase,
  waitselect

procsurvey,
 coroutlib,
 testprint,
 centralogic,
 coroutines,
 allocate,
 wait,
 signal,
 initref,
 cortosem,
 schedule,
 setpriority,
 preparetest,
 waittime,
 cotime,
 co8000event,
 coownbase,
 selecttest,
 cotimebase,
 waitselect

end
▶EOF◀