Fix not reading file correctly
This commit is contained in:
+2
-2
@@ -1,5 +1,5 @@
|
||||
program main
|
||||
use WebServer, only: get_progress
|
||||
!use WebServer, only: get_progress
|
||||
use FileReader, only: read_file
|
||||
use Greeter, only: say_hello
|
||||
|
||||
@@ -8,6 +8,6 @@ program main
|
||||
character, allocatable :: Data
|
||||
|
||||
call say_hello()
|
||||
call get_progress()
|
||||
!call get_progress()
|
||||
call read_file("/home/skingging/Documents/Projects/Fortran/Web-Server-In-Fortran/html/index.html", Data)
|
||||
end program main
|
||||
|
||||
Reference in New Issue
Block a user