Clear cert paths before running. Added diagnostic argument output to log.

1 files changed, 9 insertions, 2 deletions

diff --git a/main.f90 b/main.f90
index 0a21e5a..c587345 100644
--- a/main.f90
+++ b/main.f90
@@ -53,15 +53,16 @@ implicit none
 
     logfile = "/tmp/gnc.log"
     rootdir = " "
+    cert_public = " "
+    cert_private = " "
     
     if(command_argument_count() < 4) then
         call usage()
-        close(logunit)
         stop
     end if
     
     i = 1
-    do while(i < command_argument_count())
+    do while(i <= command_argument_count())
         call get_command_argument(i, arg)
         if(trim(arg) == "-pub") then
             i = i + 1
@@ -83,6 +84,12 @@ implicit none
    
     call write_log("Initiating program")
    
+    ! Diagnostics
+    do i = 1,command_argument_count()
+        call get_command_argument(i, arg)
+        call write_log("Argument: "//trim(arg))
+    end do
+   
     call random_seed()
     
     call library_init()