aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeff@approximatrix.com>2021-08-20 10:07:15 -0400
committerJeffrey Armstrong <jeff@approximatrix.com>2021-08-20 10:07:15 -0400
commitb45b2dd73587abeeb0351bf35a2b20d6afddff24 (patch)
tree481001f8aa16f7d6c623e72c3960ed83c411415a
parent81293bf4a46693e0598d8880fdbdd715e8801ccc (diff)
downloadlevitating-b45b2dd73587abeeb0351bf35a2b20d6afddff24.tar.gz
levitating-b45b2dd73587abeeb0351bf35a2b20d6afddff24.zip
Added token to launch of example player. Improved stdout messages for players.
-rw-r--r--player/instructions.f902
-rw-r--r--player/levitating-player.prj2
-rw-r--r--player/tasks.f902
3 files changed, 4 insertions, 2 deletions
diff --git a/player/instructions.f90 b/player/instructions.f90
index 65b392d..300fa2a 100644
--- a/player/instructions.f90
+++ b/player/instructions.f90
@@ -285,7 +285,7 @@ contains
call get_task_operation(j, i, operation)
- Print *, "Task: ", i
+ Write(*, '(1X, A5, 1X, I3, 2X)', advance='no') "Task:", i
Print *, "Operation: "//trim(operation)
if(len_trim(operation) == 0) then
diff --git a/player/levitating-player.prj b/player/levitating-player.prj
index b871c9a..12bb49f 100644
--- a/player/levitating-player.prj
+++ b/player/levitating-player.prj
@@ -92,7 +92,7 @@
"Launch Using MPI":"false",
"Keep Console":"true",
"External Console":"false",
- "Command Line Arguments":"-i windows-1 -l /tmp/player.log -w /tmp/example 127.0.0.1",
+ "Command Line Arguments":"-i windows-1 -l /tmp/player.log -t abcd_password -w /tmp/example 127.0.0.1",
"Build Before Launch":"true"
},
"Build Options":{
diff --git a/player/tasks.f90 b/player/tasks.f90
index efc0fe4..de73b01 100644
--- a/player/tasks.f90
+++ b/player/tasks.f90
@@ -42,6 +42,8 @@ contains
shell = .false.
+ Print *, "Command: "//trim(command)
+
if(is_absolute_path(directory)) then
call chdir(directory)
else