Nothing
#! /usr/bin/env Rscript
library(testthat)
library(rly)
context("Missing t_error() rule")
Lexer <- R6::R6Class("Lexer",
public = list(
tokens = c('NUMBER', 'PLUS','MINUS'),
t_PLUS = '\\+',
t_MINUS = '-',
t_NUMBER = '\\d+'
)
)
test_that("no t_error()", {
expect_output(rly::lex(Lexer), "WARN .* No t_error rule is defined")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.