1
2expect_equal(1+1,2)
3
4Sys.setenv("foo"="bar")
5expect_equal("a","b")
6
7report_side_effects(FALSE)
8Sys.setenv("foo"="baz")
9expect_equal(TRUE, TRUE)
10
11
12