# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1512153739 18000
# Node ID e96ba6a7b65438b48cf755c4aff857d90077b70d
# Parent  976d9874a0bb06d2c107aac95e3dea608efa6963
Doc

diff -r 976d9874a0bb -r e96ba6a7b654 src/main.lisp
--- a/src/main.lisp	Fri Dec 01 13:41:10 2017 -0500
+++ b/src/main.lisp	Fri Dec 01 13:42:19 2017 -0500
@@ -2,6 +2,11 @@
 
 ;;;; Utils --------------------------------------------------------------------
 (defun read-file-of-digits (path)
+  "Read all the ASCII digits in `path` into a list of integers.
+
+  Any character in the file that's not an ASCII digit will be silently ignored.
+
+  "
   (-<> path
     read-file-into-string
     (map 'list #'digit-char-p <>)