io.streams.c: help-lint
							parent
							
								
									e589f58163
								
							
						
					
					
						commit
						3588e6e4dc
					
				| 
						 | 
				
			
			@ -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 )) }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -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." } ;
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue