Build report for macos/x86.64
Tests failed
Build output:
[ "VAR foo;" "block" \ pl0 rule (parse) remaining>> empty? ]
}
Unit Test: {
{ t }
[
"VAR foo,bar , baz;" "block" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"foo := 5" "statement" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"BEGIN foo := 5 END" "statement" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"IF 1=1 THEN foo := 5" "statement" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"WHILE 1=1 DO foo := 5" "statement" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"WHILE ODD 1 DO foo := 5" "statement" \ pl0 rule (parse)
remaining>> empty?
]
}
Unit Test: {
{ t }
[
"PROCEDURE square; BEGIN squ:=x*x END" "block" \ pl0
rule (parse) remaining>> empty?
]
}
Unit Test: {
{ t }
[
"VAR x, squ;\n\nPROCEDURE square;\nBEGIN\n squ := x * x\nEND;\n\nBE..."
main \ pl0 rule (parse) remaining>> empty?
]
}
Unit Test: {
{ f }
[
" \nCONST\n m = 7,\n n = 85;\n\nVAR\n x, y, z, q, r;\n\nPROCEDURE ..."
main \ pl0 rule (parse) remaining>> empty?
]
}
Loading resource:basis/peg/search/search-tests.factor
Unit Test: {
{ V{ 123 456 } }
[ "abc 123 def 456" integer-parser peg-search ]
}
Unit Test: {
{ V{ 123 "hello" 456 } }
[
"one 123 \"hello\" two 456" integer-parser string-parser
2array choice peg-search
]
}
Unit Test: {
{ "abc 246 def 912" }
[
"abc 123 def 456" integer-parser
[ 2 * number>string ] action peg-replace
]
}
Loading resource:basis/persistent/deques/deques-tests.factor
Unit Test: {
{ 3 2 1 t }
[
{ 1 2 3 } sequence>deque 3 [ pop-back ] times
deque-empty?
]
}
Unit Test: {
{ 1 2 3 t }
[
{ 1 2 3 } sequence>deque 3 [ pop-front ] times
deque-empty?
]
}
Unit Test: {
{ 1 3 2 t }
[
{ 1 2 3 } sequence>deque pop-front 2 [ pop-back ] times
deque-empty?
]
}
Unit Test: {
{ { 2 3 4 5 6 1 } }
[
{ 1 2 3 4 5 6 } sequence>deque pop-front swap push-back
deque>sequence
]
}
Unit Test: { { 1 } [ { 1 2 3 4 } sequence>deque peek-front ] }
Unit Test: { { 4 } [ { 1 2 3 4 } sequence>deque peek-back ] }
Unit Test: { { 1 t } [ <deque> 1 push-front pop-back deque-empty? ] }
Unit Test: { { 1 t } [ <deque> 1 push-front pop-front deque-empty? ] }
Unit Test: { { 1 t } [ <deque> 1 push-back pop-front deque-empty? ] }
Unit Test: { { 1 t } [ <deque> 1 push-back pop-back deque-empty? ] }
Unit Test: {
{ 1 f }
[ <deque> 1 push-front 2 push-front pop-back deque-empty? ]
}
Unit Test: {
{ 1 f }
[ <deque> 1 push-back 2 push-back pop-front deque-empty? ]
}
Unit Test: {
{ 2 f }
[ <deque> 1 push-back 2 push-back pop-back deque-empty? ]
}
Unit Test: {
{ 2 f }
[ <deque> 1 push-front 2 push-front pop-front deque-empty? ]
}
Loading resource:basis/persistent/hashtables/hashtables-tests.factor
Unit Test: { { t } [ PH{ } assoc-empty? ] }
Unit Test: { { PH{ { "A" "B" } } } [ PH{ } "B" "A" rot new-at ] }
Unit Test: { { "B" } [ "A" PH{ { "A" "B" } } at ] }
Unit Test: { { f } [ "X" PH{ { "A" "B" } } at ] }
Unit Test: {
{ }
[
PH{ } "a" T{ hash-0-a } rot new-at "b"
T{ hash-0-b } rot new-at "ph" set
]
}
Unit Test: {
{ H{ { T{ hash-0-a } "a" } { T{ hash-0-b } "b" } } }
[ "ph" get >hashtable ]
}
Unit Test: {
{ H{ { T{ hash-0-b } "b" } } }
[ "ph" get T{ hash-0-a } swap pluck-at >hashtable ]
}
Unit Test: {
{ H{ { T{ hash-0-a } "a" } } }
[ "ph" get T{ hash-0-b } swap pluck-at >hashtable ]
}
Unit Test: {
{ H{ { T{ hash-0-a } "a" } { T{ hash-0-b } "b" } } }
[ "ph" get "X" swap pluck-at >hashtable ]
}
Unit Test: { { } [ PH{ } "B" "A" rot new-at "D" "C" rot new-at "ph" set ] }
Unit Test: { { H{ { "A" "B" } { "C" "D" } } } [ "ph" get >hashtable ] }
Unit Test: {
{ H{ { "C" "D" } } }
[ "ph" get "A" swap pluck-at >hashtable ]
}
Unit Test: {
{ H{ { "A" "B" } { "C" "D" } { "E" "F" } } }
[ "ph" get "F" "E" rot new-at >hashtable ]
}
Unit Test: {
{ H{ { "E" "F" } { "C" "D" } } }
[ "ph" get "F" "E" rot new-at "A" swap pluck-at >hashtable ]
}
Unit Test: { { t } [ 10 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 20 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 30 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 50 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 100 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 500 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 1000 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 5000 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 10000 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 50000 test-persistent-hashtables-1 ] }
Unit Test: { { t } [ 6000 test-persistent-hashtables-2 ] }
Loading resource:basis/persistent/heaps/heaps-tests.factor
Unit Test: {
{
{
{ "baz" -7 }
{ "bar" -1 }
{ "bing" 0 }
{ "foo" 1 }
{ "goodbye" 2 }
{ "hello" 3 }
{ "whatever" 5 }
}
}
[ test-input assoc>pheap pheap>alist ]
}
Loading resource:basis/persistent/vectors/vectors-tests.factor
Unit Test: { { 0 } [ PV{ } length ] }
Unit Test: { { 1 } [ 3 PV{ } ppush length ] }
Unit Test: { { 3 } [ 3 PV{ } ppush first ] }
Unit Test: {
{ PV{ 3 1 3 3 7 } }
[ PV{ } { 3 1 3 3 7 } [ swap ppush ] each ]
}
Unit Test: {
{ { 3 1 3 3 7 } }
[ PV{ } { 3 1 3 3 7 } [ swap ppush ] each >array ]
}
Unit Test: { [ t ] [ 100 <iota> dup >persistent-vector sequence= ] }
Unit Test: { [ t ] [ 1060 <iota> dup >persistent-vector sequence= ] }
Unit Test: { [ t ] [ 2000 <iota> dup >persistent-vector sequence= ] }
Unit Test: { [ t ] [ 10000 <iota> dup >persistent-vector sequence= ] }
Unit Test: { [ t ] [ 100000 <iota> dup >persistent-vector sequence= ] }
Unit Test: { [ t ] [ 1000000 <iota> dup >persistent-vector sequence= ] }
Unit Test: { { } [ 10000 [ 16 random-bits ] PV{ } replicate-as "1" set ] }
Unit Test: { { } [ "1" get >vector "2" set ] }
Unit Test: {
{ t }
[
3000 <iota> [
drop 16 random-bits 10000 random
[ "1" [ new-nth ] change ]
[ "2" [ new-nth ] change ] 2bi
"1" get "2" get sequence=
] all?
]
}
Must Fail With: { [ PV{ } ppop ] [ empty-error? ] }
Unit Test: { { t } [ PV{ 3 } ppop empty? ] }
Unit Test: { { PV{ 3 7 } } [ PV{ 3 7 6 } ppop ] }
Unit Test: { { PV{ 3 7 6 5 } } [ 5 PV{ 3 7 6 } ppush ] }
Unit Test: { { } [ PV{ } "1" set ] }
Unit Test: { { } [ V{ } clone "2" set ] }
Unit Test: { { } [ PV{ } 10000 [ push/pop-test ] times drop ] }
Unit Test: {
{ PV{ } }
[ PV{ } 10000 [ 1 swap ppush ] times 10000 [ ppop ] times ]
}
Unit Test: {
{ t }
[
10000 <iota> >persistent-vector 752 [ ppop ] times
dup length <iota> sequence=
]
}
Unit Test: {
{ t }
[
100 <iota> [
drop 100 random [
16 random-bits
[ "1" [ ppush ] change ] [ "2" get push ] bi
] times 100 random "1" get length min
[ "1" [ ppop ] change "2" get pop* ] times
"1" get "2" get sequence=
] all?
]
}
Loading resource:extra/picomath/picomath-tests.factor
Unit Test: {
{ t }
[
{
{ -3 -0.999977909503 }
{ -1 -0.84270079295 }
{ 0.0 0.0 }
{ 0.5 0.520499877813 }
{ 2.1 0.997020533344 }
} [ [ first erf ] [ second - ] bi abs ] map
maximum 0.000001 <
]
}
Unit Test: {
{ t }
[
{
{ -1 -0.632120558828558 }
{ 0.0 0.0 }
{ 9.990000000000001e-6 9.990049900216167e-6 }
{ 0.00001001 1.001005010021717e-5 }
{ 0.5 0.6487212707001282 }
} [ [ first expm1 ] [ second - ] bi abs ] map
maximum 0.000001 <
]
}
Unit Test: {
{ t }
[
{
{ -3 0.00134989803163 }
{ -1 0.158655253931 }
{ 0.0 0.5 }
{ 0.5 0.691462461274 }
{ 2.1 0.982135579437 }
} [ [ first phi ] [ second - ] bi abs ] map
maximum 0.001 <
]
}
Unit Test: {
{ t }
[
{ 0 1 10 100 1000 10000 }
[ [ factorial log ] [ log-factorial ] bi - abs ] map
maximum 0.000001 <
]
}
Unit Test: {
{ t }
[
{
{ 1e-20 1e+20 }
{ 2.19824158876e-16 4549090532700000.0 }
{ 2.24265050974e-16 4459009532050000.0 }
{ 0.00099 1009.52477271 }
{ 0.001 999.423772485 }
{ 0.00101 989.522792258 }
{ 6.1 142.451944066 }
{ 11.999 39819417.4793 }
{ 12 39916800.0 }
{ 12.001 40014424.1571 }
{ 15.2 149037380723.0 }
} [ [ first gamma ] [ second relative-error ] bi ] map
maximum 0.000001 <
]
}
Unit Test: {
{ t }
[
{
{ 0.000000000001 27.6310211159 }
{ 0.9999 0.0000577297915613 }
{ 1.0001 -0.0000577133422205 }
{ 3.1 0.787375083274 }
{ 6.3 5.30734288962 }
{ 11.9999 17.5020635801 }
{ 12 17.5023078459 }
{ 12.0001 17.5025521125 }
{ 27.4 62.5755868211 }
} [ [ first log-gamma ] [ second relative-error ] bi ]
map maximum 0.0000000001 <
]
}
Loading resource:extra/ping/ping-tests.factor
Must Not Fail: { [ "localhost" ping ] }
--> test failed!
Unit Test: { [ t ] [ "localhost" alive? ] }
--> test failed!
Unit Test: { [ t ] [ "127.0.0.1" alive? ] }
--> test failed!
Unit Test: { [ f ] [ "0.0.0.0" alive? ] }
Loading resource:extra/poker/poker-tests.factor
Unit Test: { { 134236965 } [ "KD" >ckf ] }
Unit Test: { { 529159 } [ "5s" >ckf ] }
Unit Test: { { 33589533 } [ "jc" >ckf ] }
Unit Test: { { 7462 } [ "7C 5D 4H 3S 2C" string>value ] }
Unit Test: { { 1601 } [ "KD QS JC TH 9S" string>value ] }
Unit Test: { { 11 } [ "AC AD AH AS KC" string>value ] }
Unit Test: { { 9 } [ "6C 5C 4C 3C 2C" string>value ] }
Unit Test: { { 1 } [ "AC KC QC JC TC" string>value ] }
Unit Test: { { "High Card" } [ "7C 5D 4H 3S 2C" string>hand-name ] }
Unit Test: { { "Straight" } [ "KD QS JC TH 9S" string>hand-name ] }
Unit Test: { { "Four of a Kind" } [ "AC AD AH AS KC" string>hand-name ] }
Unit Test: { { "Straight Flush" } [ "6C 5C 4C 3C 2C" string>hand-name ] }
Unit Test: {
{ t }
[ "7C 5D 4H 3S 2C" "KD QS JC TH 9S" [ string>value ] bi@ > ]
}
Unit Test: {
{ t }
[ "AC AD AH AS KC" "KD QS JC TH 9S" [ string>value ] bi@ < ]
}
Unit Test: {
{ t }
[ "7C 5D 4H 3S 2C" "7D 5D 4D 3C 2S" [ string>value ] bi@ = ]
}
Unit Test: {
{ t }
[ "7C 5D 4H 3S 2C" "2C 3S 4H 5D 7C" [ string>value ] bi@ = ]
}
Unit Test: {
{ t }
[ "7C 5D 4H 3S 2C" "7D 5D 4D 3C 2S" [ string>value ] bi@ = ]
}
Unit Test: { { 190 } [ "AS KD JC KH 2D 2S KC" string>value ] }
Loading resource:extra/pop3/pop3-tests.factor
Unit Test: { { } [ "p1" get mock-pop3-server ] }
Unit Test: {
{ }
[
<pop3-account> "127.0.0.1" >>host
"p1" get 5 seconds ?promise-timeout >>port connect
]
}
Launcher error:
Process was killed as a result of a call to
kill-process, or a timeout
Launch descriptor:
T{ process
{ command { "./factor" "-run=mason.test" } }
{ environment H{ } }
{ environment-mode +append-environment+ }
{ stdin +closed+ }
{ stdout "../test-log" }
{ stderr +stdout+ }
{ group +new-group+ }
{ timeout T{ duration { hour 2 } } }
{ status T{ signal { n 15 } } }
{ killed t }
}