parse(text='1+1')
eval(parse(text='1+1'))
eval(parse(text='x<-1+1'))
ls()
rm(x)
eval('1+1')
source('test_r_eval')
source('test-r-eval')
source('test-r-eval')
source('test-r-eval')
warnings()
warnings()
source('test-r-eval')
source('test-r-eval')
source('test-r-eval')
save_serialize('empty_sym', bquote())
eval(parse('bquote()'))
eval(parse(text='bquote()'))
value <- eval(parse(text='bquote()'))
str(value)
str(eval(parse(text='bquote()')))
source('test-r-eval')
source('test-r-eval')
source('test-rserve-eval')
warnings()
