示例#1
0
文件： interpret.c 项目： dgs/muforth 
void mu_load_file()    /* c-string-name */
{
    int fd;

    mu_push_r_slash_o();
    mu_open_file();
    fd = TOP;
    mu_mmap_file();
    PUSH(XTK(mu_evaluate));
    mu_catch();
    close(fd);
    mu_throw();
}
示例#2
0
文件： file.c 项目： nickhen/muforth 
void mu_open_file_rw()
{
    PUSH(O_RDWR);
    mu_open_file();
}
示例#3
0
文件： file.c 项目： nickhen/muforth 
void mu_open_file_ro()
{
    PUSH(O_RDONLY);
    mu_open_file();
}
示例#4
0
void mu_open_file_ro_nonblocking()
{
    PUSH(O_RDONLY | O_NONBLOCK);
    mu_open_file();
}
示例#5
0
void mu_open_file_wo()
{
    PUSH(O_WRONLY);
    mu_open_file();
}