version 1.231, 2008/07/27 09:58:29
|
version 1.232, 2008/08/09 13:24:25
|
Line 2460 l! ( w c_addr -- ) gforth l_store
|
Line 2460 l! ( w c_addr -- ) gforth l_store
|
|
|
lib-error ( -- c_addr u ) gforth lib_error |
lib-error ( -- c_addr u ) gforth lib_error |
""Error message for last failed @code{open-lib} or @code{lib-sym}."" |
""Error message for last failed @code{open-lib} or @code{lib-sym}."" |
c_addr = lt_dlerror(); |
c_addr = (Char *)lt_dlerror(); |
u = (c_addr == NULL) ? 0 : strlen(c_addr); |
u = (c_addr == NULL) ? 0 : strlen((char *)c_addr); |
|
|
\+ |
\+ |
\g peephole |
\g peephole |