io.streams.c: help-lint

db4
Joe Groff 2011-10-14 20:36:17 -07:00
parent e589f58163
commit 3588e6e4dc
2 changed files with 3 additions and 3 deletions

View File

@ -440,8 +440,8 @@ tuple
{ "(fopen)" "io.streams.c" "primitive_fopen" (( path mode -- alien )) }
{ "fclose" "io.streams.c" "primitive_fclose" (( alien -- )) }
{ "fflush" "io.streams.c" "primitive_fflush" (( alien -- )) }
{ "fgetc" "io.streams.c" "primitive_fgetc" (( alien -- ch/f )) }
{ "fputc" "io.streams.c" "primitive_fputc" (( ch alien -- )) }
{ "fgetc" "io.streams.c" "primitive_fgetc" (( alien -- byte/f )) }
{ "fputc" "io.streams.c" "primitive_fputc" (( byte alien -- )) }
{ "fread-unsafe" "io.streams.c" "primitive_fread" (( n buf alien -- count )) }
{ "fseek" "io.streams.c" "primitive_fseek" (( alien offset whence -- )) }
{ "ftell" "io.streams.c" "primitive_ftell" (( alien -- n )) }

View File

@ -62,7 +62,7 @@ HELP: fgetc ( alien -- byte/f )
{ $description "Reads a single byte from a C FILE* handle, and outputs " { $link f } " on end of file." }
{ $errors "Throws an error if the input operation failed." } ;
HELP: fputc ( byte alien -- ch/f )
HELP: fputc ( byte alien -- )
{ $values { "byte" "an integer from 0 to 255" } { "alien" "a C FILE* handle" } }
{ $description "Writes a single byte to a C FILE* handle." }
{ $errors "Throws an error if the output operation failed." } ;