30 lines
949 B
Text
30 lines
949 B
Text
|
# -*- perl -*-
|
||
|
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
use tests::tests;
|
||
|
|
check_expected ([<<'EOF']);
|
||
|
|
(priority-sema) begin
|
||
|
|
(priority-sema) Thread priority 30 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 29 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 28 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 27 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 26 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 25 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 24 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 23 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 22 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) Thread priority 21 woke up.
|
||
|
|
(priority-sema) Back in main thread.
|
||
|
|
(priority-sema) end
|
||
|
|
EOF
|
||
|
|
pass;
|