remoev comment

camfort · Sep 3, 2024 · 2240b9d · 2240b9d
1 parent 31a3e06
commit 2240b9d
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/Language/Fortran/Repr/Value/Machine.hs b/src/Language/Fortran/Repr/Value/Machine.hs
@@ -26,7 +26,6 @@ fromConstInt (MkFScalarValue (FSVInt a)) = Just $ withFInt a
 fromConstInt _          = Nothing
 
 fromConstReal :: FValue -> Maybe Double
--- convert Float to Double
 fromConstReal (MkFScalarValue (FSVReal (FReal4 a))) = Just $ floatToDouble a
   where
     floatToDouble :: Float -> Double