src/cforth/io.c
void pfmarkinput(void *fp, cell *up)
{
    filepath_t *this = remove_path((FILE *)fp);
    if (this) {
        this->next = input_stack.next;
        input_stack.next = this;
    }
}
// Pushes the path record for fp onto the input stack
Pushes the path record for fp onto the input stack
Pushes the path record for fp onto the input stack
void pfmarkinput(void *fp, cell *up)
{
    filepath_t *this = remove_path((FILE *)fp);
    if (this) {
        this->next = input_stack.next;
        input_stack.next = this;
    }
}
void pfmarkinput ( void * fp , cell * up ) { filepath_t * this = remove_path ( ( FILE * ) fp ) ; if ( this ) { this -> next = input_stack . next ; input_stack . next = this ; } }
Pushes the path record for fp onto the input stack
Pushes the path record for fp onto the input stack