Exemplo n.º 1
0
long kbd_iodbunit_vmsinit(struct _ddb * ddb,int unitno,void * dsc) {
  unsigned short int chan;
  struct _ucb * newucb;
  ioc_std$clone_ucb(ddb->ddb$ps_ucb/*&kb$ucb*/,&newucb);
  exe$assign(dsc,&chan,0,0,0);


  return newucb;
}
Exemplo n.º 2
0
Arquivo: ne.c Projeto: rroart/freevms
long er_iodbunit_vmsinit(struct _ddb * ddb,int unitno,void * dsc)
{
    unsigned short int chan;
    struct _ucbnidef * newucb;
    ioc_std$clone_ucb(ddb->ddb$ps_ucb/*&er$ucb*/,&newucb);
    exe$assign(dsc,&chan,0,0,0);
    //  registerdevchan(MKDEV(IDE0_MAJOR,unitno),chan);

    eru = newucb;

    return newucb;
}