Running ‘testthat.R’ [8s/12s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(rmonad)
  > 
  > test_check("rmonad")
  ── 1. Error: %>>% and esc work (simple) (@test-binops.R#4)  ────────────────────
  bad value
  1: expect_equal(1 %>>% *2 %>% esc, 2) at testthat/test-binops.R:4
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ── 2. Error: %>>% chaining works (@test-binops.R#20)  ──────────────────────────
  bad value
  1: expect_equal(1 %>>% *2 %>>% *4 %>>% *3 %>% esc, 24) at testthat/test-binops.R:20
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ── 3. Error: last passing value propagate (@test-binops.R#30)  ─────────────────
  bad value
  1: expect_equal(1 %>>% *2 %>>% *"4" %>>% *3 %>% .single_value, 2) at testthat/test-binops.R:30
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ── 4. Error: output toss works %>_% (@test-binops.R#70)  ───────────────────────
  bad value
  1: expect_equal(1 %>_% *3 %>>% *2 %>% get_code, list("1", "*3", "*2")) at testthat/test-binops.R:70
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ── 5. Error: branching works %>^% (@test-branch.R#25)  ─────────────────────────
  bad value
  1: expect_equal(16 %>^% sqrt %>^% *2 %>% get_value, list(16, 4, 32)) at testthat/test-branch.R:25
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ── 6. Error: as_monad handles docstrings (@test-nse.R#102)  ────────────────────
  bad value
  1: expect_equal(as_monad({
         "asdf"
         5
     }) %>>% *6 %>% esc, 30) at testthat/test-nse.R:102
  2: quasi_label(enquo(object), label)
  3: force(quo)
  4: enquo(object)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 276 SKIPPED: 0 FAILED: 6
  1. Error: %>>% and esc work (simple) (@test-binops.R#4) 
  2. Error: %>>% chaining works (@test-binops.R#20) 
  3. Error: last passing value propagate (@test-binops.R#30) 
  4. Error: output toss works %>_% (@test-binops.R#70) 
  5. Error: branching works %>^% (@test-branch.R#25) 
  6. Error: as_monad handles docstrings (@test-nse.R#102) 
  
  Error: testthat unit tests failed
  Execution halted