: SLFunc: CREATE-WORD word '[ 0 tuck "void*" "libMagickWand" _ { "char*" "ulong*" } alien-invoke ] define ;