ATRONIX: Check REB_TIME for timeout parameter

So wait [p 0:0:0.5] will properly pick up the timeout as 0.5 second.

Without the change, if the timeout is of type TIME, it's ignored, which makes
`wait [p 0:0:0.5]' equivalent to `wait [p]' which waits forever until `p' has
events.

(cherry picked from commit 2111dae)

Author: Oldes

src/core/n-io.c

@@ -329,7 +329,7 @@ static REBSER *Read_All_File(char *fname)
 		DS_RELOAD(ds);
 		for (val = BLK_HEAD(ports); NOT_END(val); val++) { // find timeout
 			if (Pending_Port(val)) n++;
-			if (IS_INTEGER(val) || IS_DECIMAL(val)) break;
+			if (IS_INTEGER(val) || IS_DECIMAL(val) || IS_TIME(val)) break;
 		}
 		if (IS_END(val)) {
 			if (n == 0) return R_NONE; // has no pending ports!