From 88bc4efd9d7c156f5987535eecdce6a5fbefd240 Mon Sep 17 00:00:00 2001
From: Taylor Fausak <taylor@fausak.me>
Date: Sat, 10 Jul 2021 14:29:58 -0500
Subject: [PATCH] Update src/lib/Witch/Instances.hs

---
 src/lib/Witch/Instances.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lib/Witch/Instances.hs b/src/lib/Witch/Instances.hs
index bc0b958..4541ef6 100644
--- a/src/lib/Witch/Instances.hs
+++ b/src/lib/Witch/Instances.hs
@@ -908,7 +908,7 @@ instance From.From Rational Float where
 instance From.From Rational Double where
   from = fromRational
 
--- | TODO
+-- | Uses `fromRational` as long as there isn't a loss of precision.
 instance Fixed.HasResolution a => TryFrom.TryFrom Rational (Fixed.Fixed a) where
   tryFrom = Utility.eitherTryFrom $ \s ->
     let t = fromRational s :: Fixed.Fixed a