Reneging arrivals cannot seize the same resource #227
Description
Reported here. Minimal example not involving priorities:
traj <- trajectory() %>%
renege_in(
t = 5,
out = trajectory() %>%
seize("resource") %>%
timeout(10) %>%
release("resource")
) %>%
seize("resource") %>%
renege_abort() %>%
timeout(10) %>%
release("resource")
simmer(verbose=TRUE) %>%
add_resource("resource") %>%
add_generator("dummy", traj, at(0, 3)) %>%
run()
#> 0 | source: dummy | new: dummy0 | 0
#> 0 | source: dummy | new: dummy1 | 3
#> 0 | arrival: dummy0 | activity: RenegeIn | 5, 0, 1 paths
#> 0 | arrival: dummy0 | activity: Seize | resource, 1, 0 paths
#> 0 | resource: resource | arrival: dummy0 | SERVE
#> 0 | arrival: dummy0 | activity: RenegeAbort |
#> 0 | arrival: dummy0 | activity: Timeout | 10
#> 3 | arrival: dummy1 | activity: RenegeIn | 5, 0, 1 paths
#> 3 | arrival: dummy1 | activity: Seize | resource, 1, 0 paths
#> 3 | resource: resource | arrival: dummy1 | ENQUEUE
#> 8 | task: Renege-Timer | : |
#> 8 | resource: resource | arrival: dummy1 | DEPART
#> 8 | arrival: dummy1 | activity: Seize | resource, 1, 0 paths
#> 8 | resource: resource | arrival: dummy1 | ENQUEUE
#> 10 | arrival: dummy0 | activity: Release | resource, 1
#> 10 | resource: resource | arrival: dummy0 | DEPART
#> 10 | task: Post-Release | : |
#> 10 | resource: resource | arrival: dummy1 | SERVE
#> simmer environment: anonymous | now: 10 | next:
#> { Monitor: in memory }
#> { Resource: resource | monitored: TRUE | server status: 1(1) | queue status: 0(Inf) }
#> { Source: dummy | monitored: 1 | n_generated: 2 }dummy1 seems to seize the resource, but it does not progress. Seizing other resources works ok though.