Squash some compiler errors

LivInTheLookingGlass · Oct 1, 2024 · 10637dd · 10637dd
1 parent dabd2d4
commit 10637dd
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/fortran/src/include/utils.f90 b/fortran/src/include/utils.f90
@@ -118,7 +118,7 @@ function get_answer(id) result(answer)
 
         deallocate(text)
         cache_inited = .true.
-        answer = get_answer(id)
+        answer = cached_answers(id)
     end function
 
     subroutine parse_line(line, id_out, type_out, length_out, value_out)

diff --git a/fortran/src/p0013.f90 b/fortran/src/p0013.f90
@@ -181,7 +181,7 @@ integer(kind=8) function p0013() result(answer)
             41698116222072_8, 977186158236678424_8, 689157993532961922_8, &
             62467957194401_8, 269043877107275048_8, 102390895523597457_8, &
             23189706772547_8, 915061505504953922_8, 979530901129967519_8, &
-            86188088225875_8, 314529584099251203_8, 829009407770775672 /
+            86188088225875_8, 314529584099251203_8, 829009407770775672_8 /
 
         arr = (/ 0, 0, 0 /)
         do i = 1, 100