diff --git a/core/IO.carp b/core/IO.carp
index e62e0718..dab0ced5 100644
--- a/core/IO.carp
+++ b/core/IO.carp
@@ -16,8 +16,10 @@ module are wrappers around the C standard library.")
     (register stderr (Ptr FILE) "stderr")
     (doc      get-char "gets a character from stdin (thin wrapper for getchar() from C standard library).")
     (register get-char (Fn [] Int) "getchar") 
-    (doc      fgetc "gets a character from file (thin wrapper for the from C standard library).")
+    (doc      fgetc "gets a character from file (thin wrapper for fgetc from the C standard library).")
     (register fgetc (Fn [(Ptr FILE)] Int) "fgetc") 
+    (doc fputc "writes a character to a file (thin wrapper for fputc from the C standard library).")
+    (register fputc (Fn [Int (Ptr FILE)] Int) "fputc")
     (doc      EOF "the End-Of-File character as a literal (thin wrapper for the C standard library)")
     (register EOF Int "EOF")
     (private  fopen-)