diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-11-01 16:51:04 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-11-01 16:51:04 -0400 |
| commit | 93217d7cce249854248ce68d455705253cf63a65 (patch) | |
| tree | aad94c9b71d94247c6c31c171a044895b3171701 /test/dz_comp | |
| parent | d827ec77a2a53f4b99455b0512c7b2fd237d353c (diff) | |
Clean up test directory structure
Diffstat (limited to 'test/dz_comp')
| -rwxr-xr-x | test/dz_comp | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/test/dz_comp b/test/dz_comp deleted file mode 100755 index e9bf1c06..00000000 --- a/test/dz_comp +++ /dev/null @@ -1,34 +0,0 @@ -#! /usr/bin/env dbqn - -nc‿rt‿ref ← "-nocomp"‿"-rt"‿"-ref" ∊ •args -files ← "simple"‿"syntax"‿"prim"⍟(0=≠) ('-'≠⊑)¨⊸/ •args -"Can't test runtime without the compiler!" ! ¬nc∧rt∨ref - -Native ← •BQN -exec ← { - nc ? Native ; - # Otherwise compiled - ⟨DRun⟩ ← •Import "dc.bqn" - r ← { - ref ? •Import "ref.bqn" ; # Reference implementations - rt ? •Import "dzrt.bqn" ; # Self-hosted - •BQN∘⥊¨ ∾ •Import "../src/glyphs.bqn" # Native runtime - } - r⊸DRun -} - -Cases ← (0<≠)◶0‿('#'≠⊑)¨⊸/ · •FLines "cases/"∾∾⟜".bqn" -c ← ∾ Cases¨ files -Trim ← ((∨`∧∨`⌾⌽)' '⊸≠)⊸/ -M ← {e‿b: - Msg ← {∾⟨ - """",b,""": expected " - "to fail"⍟("!"⊸≡)e - " but " - 0⊸≡◶⟨"received "∾2•Fmt⊑,"evaluation failed"⟩𝕩 - ⥊@+10 - ⟩} - ("!"⊸≡◶⟨<Native,0˙⟩ e) ≢◶""‿Msg <∘Exec⎊0 b -} -r ← (M '%'⊸= (∨´⊣)◶⟨"1"≍○<⊢, Trim¨(+`-2⊸×)⊸⊔⟩ ⊢)¨ c -•Out ("All "∾(•Repr≠c)∾" passed!")⍟(0=≠) ¯1↓∾r |
