version 1.67, 2010/12/31 18:09:02
|
version 1.68, 2011/01/01 14:22:47
|
Line 659 DEFER compile-wrapper-function ( -- )
|
Line 659 DEFER compile-wrapper-function ( -- )
|
\G specified stack effect and calls the C function @code{c-name}. |
\G specified stack effect and calls the C function @code{c-name}. |
['] parse-function-types (c-function) ; |
['] parse-function-types (c-function) ; |
|
|
: c-value ( "forth-name" "c-name" "[---]" "type" -- ) \ gforth |
: c-value ( "forth-name" "c-name" "---" "type" -- ) \ gforth |
\G Define a Forth word @i{forth-name}. @i{Forth-name} has the |
\G Define a Forth word @i{forth-name}. @i{Forth-name} has the |
\G specified stack effect and gives the C value of @code{c-name}. |
\G specified stack effect and gives the C value of @code{c-name}. |
['] parse-value-type (c-function) ; |
['] parse-value-type (c-function) ; |