Mercurial > hg > CbC > CbC_xv6
view src/sys_read_impl.cbc @ 133:ae25a4e76377
fix gen_context.pl
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Wed, 11 Dec 2019 17:10:43 +0900 |
parents | 8e93917ce4be |
children | 0c24464a66d8 |
line wrap: on
line source
#include "../context.h" #interface "SysRead.h" //data_gear "file.dg" // ---- // typedef struct SysReadImpl <Type, Isa> impl SysRead { // // } SysReadImpl; // ---- SysRead* createSysReadImpl(struct Context* cbc_context) { struct SysRead* sys_read = new SysRead(); struct SysReadImpl* sys_read_impl = new SysReadImpl(); sys_read->sys_read = (union Data*)sys_read_impl; sys_read->num = 0; sys_read->addr = NULL; sys_read->file = NULL; sys_read->read = C_readSysReadImpl; sys_read->next = C_nextSysReadImpl; return sys_read; } __code readSysReadImpl(struct SysReadImpl* sys_read, __code next(...)) { goto next(...); } __code nextSysReadImpl(...) { }