From c30efef469e22c8ba345a72c058c28362e57b746 Mon Sep 17 00:00:00 2001 From: Joel Martin Date: Mon, 3 Nov 2014 20:02:09 -0600 Subject: R: add step6_file and step7_quote Change symbols to be special class. --- r/types.r | 2 ++ 1 file changed, 2 insertions(+) (limited to 'r/types.r') diff --git a/r/types.r b/r/types.r index 2816143..a3eebcf 100644 --- a/r/types.r +++ b/r/types.r @@ -66,6 +66,8 @@ get_error <- function(e) { # Scalars nil <- structure("malnil", class="nil") .nil_q <- function(obj) "nil" == class(obj) +new.symbol <- function(name) structure(name, class="Symbol") +.symbol_q <- function(obj) "Symbol" == class(obj) # Functions -- cgit v1.2.3