move test/cmp.bqn to test/run.bqn system

This commit is contained in:
dzaima 2025-06-01 05:44:27 +03:00
parent 6a5ce4c11b
commit 3da8a8931b
3 changed files with 9 additions and 6 deletions

View File

@ -7,7 +7,6 @@ test/mainCfgs.sh path/to/mlochbaum/BQN // run the test suite for a couple primar
test/x86Cfgs.sh path/to/mlochbaum/BQN // run the test suite for x86-64-specific configurations, including singeli; 32-bit build is "supposed" to fail one test involving ⋆⁼ test/x86Cfgs.sh path/to/mlochbaum/BQN // run the test suite for x86-64-specific configurations, including singeli; 32-bit build is "supposed" to fail one test involving ⋆⁼
test/moreCfgs.sh path/to/mlochbaum/BQN // run "2+2" in a bunch of configurations; requires dzaima/BQN to be accessible as dbqn test/moreCfgs.sh path/to/mlochbaum/BQN // run "2+2" in a bunch of configurations; requires dzaima/BQN to be accessible as dbqn
test/run.bqn // run tests in test/cases/ test/run.bqn // run tests in test/cases/
./BQN test/cmp.bqn // fuzz-test scalar comparison functions =≠<≤>≥
./BQN test/copy.bqn // fuzz-test creating new arrays with elements copied from another ./BQN test/copy.bqn // fuzz-test creating new arrays with elements copied from another
./BQN test/mut.bqn // fuzz-test mut.h (currently just bitarr fill) ./BQN test/mut.bqn // fuzz-test mut.h (currently just bitarr fill)
./BQN test/various.bqn // tests for various small things ./BQN test/various.bqn // tests for various small things

View File

@ -1,5 +1,7 @@
noerr•args ### WHOLE-FILE-TEST
•Outnoerr "Not executing tests that would error" # tests scalar comparison functions =≠<≤>≥
helpers •args
noerr helpers.shouldNotError # %ALLOW_CATCH
fns =<> fns =<>
n 0÷0 n 0÷0
nn -n nn -n
@ -31,7 +33,7 @@ ElType ← •internal.ElType
NEas ((¨=˙) 8·ElType 2¨)/ NEas ((¨=˙) 8·ElType 2¨)/
•Out "AS" # •Out "AS"
{ {
fnarratm: fnarratm:
C@ ´(¨) {(𝕩 V arr) Fn"err" atm}¨ LV arr?0; C@ ´(¨) {(𝕩 V arr) Fn"err" atm}¨ LV arr?0;
@ -41,10 +43,10 @@ fn‿arr‿atm:
•Show fn •Show fn
•Show atm •Show atm
•Show (LV arr){(𝕩 V arr) Fn"err" atm}¨ LV arr •Show (LV arr){(𝕩 V arr) Fn"err" atm}¨ LV arr
•Exit 1 ! 0
}¨ NEasnoerr (<)<´ fnsarrsatms }¨ NEasnoerr (<)<´ fnsarrsatms
•Out "AA" # •Out "AA"
{ {
fnlr: fnlr:
C@ C@

View File

@ -250,6 +250,8 @@ helpers ← {
w F _𝕣_ LV x: (CLR@) (LV 𝕨) {(𝕨 TV w) F 𝕩 TV x} LV 𝕩 w F _𝕣_ LV x: (CLR@) (LV 𝕨) {(𝕨 TV w) F 𝕩 TV x} LV 𝕩
} }
shouldNotError o.noerr
{o.heapverify? IndistinguishableEEqual; @} {o.heapverify? IndistinguishableEEqual; @}
Classify {(𝕩) Indistinguishable˜ 𝕩} Classify {(𝕩) Indistinguishable˜ 𝕩}