view src/impl/PipeRead.cbc @ 104:9bfc4fbb5502

create PipeRead.cbc
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Wed, 20 Nov 2019 20:15:12 +0900
parents
children f1be2d5abc8a
line wrap: on
line source

#include "../context.h";
#interface "SysRead.h";

// ----
// typedef struct PipeRead<Type, Isa> impl SysRead {
//   struct CbCPipe *pipe;
//   struct String *addr;
//   struct Integer* i;
// } PipeRead;
// ----

SysRead* createPipeRead(struct Context* cbc_context) {
    struct SysRead* sys_read  = new SysRead();
    struct PipeRead* pipeRead = new PipeRead();
    sys_read->sys_read = (union Data*)pipeRead;
    pipeRead->num = NULL;
    sys_read->read = C_readPipeRead;
    sys_read->ret = C_retPipeRead;
    sys_read->next = C_nextPipeRead;
    return sys_read;
}
__code readPipeRead(__code next(...)) {

  goto next(...);
}

__code retPipeRead(PipeRead* cbc_sys_file, UInteger* num) {

}

__code nextPipeRead(...) {

}