gforth/kernel/require.fs - diff

Return to require.fs CVS log

Up to [gforth] / gforth / kernel

version 1.4, 1998/06/17 16:55:18	version 1.5, 1998/12/08 22:03:13
Line 1	Line 1
\ require.fs	\ require.fs

\ Copyright (C) 1995-1997 Free Software Foundation, Inc.	\ Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc.

\ This file is part of Gforth.	\ This file is part of Gforth.

Line 20	Line 20

\ Now: Kernel Module, Reloadable	\ Now: Kernel Module, Reloadable

\ $Id$

create included-files 0 , 0 , ( pointer to and count of included files )	create included-files 0 , 0 , ( pointer to and count of included files )
here ," ./the terminal" dup c@ swap 1 + swap , A, here 2 cells -	here ," ./the terminal" dup c@ swap 1 + swap , A, here 2 cells -
create image-included-files 1 , A, ( pointer to and count of included files )	create image-included-files 1 , A, ( pointer to and count of included files )