diff --git a/fmt-c-writer.scm b/fmt-c-writer.scm
index fa8c230..c3c42f3 100644
--- a/fmt-c-writer.scm
+++ b/fmt-c-writer.scm
@@ -157,7 +157,7 @@
        .
        ,(walk-expr maybe-body)))))
 
-;;; Todo: isn't there a better way?
+;;; TODO: isn't there a better way?
 (define (is-probably-type form)
   (case (car form)
     ((¤ * const volatile struct union) #t)