Remove debug prints

LivInTheLookingGlass · Oct 1, 2024 · c0349eb · c0349eb
1 parent d2c71bf
commit c0349eb
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/fortran/src/include/utils.f90 b/fortran/src/include/utils.f90
@@ -70,9 +70,7 @@ function get_answer(id) result(answer)
             return
         end if
 
-        print *, "Initializing cache array"
         do i=1, size(cached_answers)
-            print *, "  Item:", i
             cached_answers(i)%type = errort
         end do
 
@@ -82,7 +80,6 @@ function get_answer(id) result(answer)
         end if
         row_start = 1
         line_length = 1
-        print *, "File loaded, beginning main loop"
         do while (line_length > 0)
             line_length = index(text(row_start:), char(10))  ! Find the next line
             row_end = row_start + line_length - 1
@@ -95,7 +92,6 @@ function get_answer(id) result(answer)
                     row_start = row_start + line_length
                     cycle
                 end if
-                print *, "  Processing id:", id_
                 read(id_, *, iostat=ios) i
                 if (ios /= 0) then
                     print *, "Invalid integer literal for id. Moving on without explicit error, but please debug this"