fix end program

Author: perazz

test/fpm_test/test_source_parsing.f90

@@ -407,7 +407,7 @@ subroutine test_program_noheader(error)
             & 'contains', &
             & 'subroutine f()', &
             & 'end subroutine f', &
-            & 'end program my_program'
+            & 'end program'
         close(unit)
 
         f_source = parse_f_source(temp_file,error)