gforth/libcc.fs - diff

Return to libcc.fs CVS log

Up to [gforth] / gforth

version 1.37, 2008/06/17 20:48:21	version 1.38, 2008/06/17 21:27:54
Line 587 clear-libs	Line 587 clear-libs
true abort" Called function of unfinished named C library" ;	true abort" Called function of unfinished named C library" ;

: c-library-name ( c-addr u -- ) \ gforth	: c-library-name ( c-addr u -- ) \ gforth
\G Start a C library with name @i{c-addr u}.	\G Start a C library interface with name @i{c-addr u}.
clear-libs	clear-libs
['] c-library-incomplete is compile-wrapper-function	['] c-library-incomplete is compile-wrapper-function
c-library-name1 ;	c-library-name1 ;
Line 596 clear-libs	Line 596 clear-libs
\G Parsing version of @code{c-library-name}	\G Parsing version of @code{c-library-name}
name save-mem c-library-name ;	name save-mem c-library-name ;

: end-c-library ( -- )	: end-c-library ( -- ) \ gforth
	\G Finish and (if necessary) build the latest C library interface.
['] compile-wrapper-function1 is compile-wrapper-function	['] compile-wrapper-function1 is compile-wrapper-function
compile-wrapper-function1 ;	compile-wrapper-function1 ;