gistfile1.txt

#[derive(Debug)]
pub enum RRustError {
        ConversionError,
}
type convertError<T> = Result<T, RRustError>;

pub trait Robject {
        fn l(&self) -> isize;
        fn toSexp(&self) -> rRinternal::SEXP ;
        fn t(&self) -> i32;
        fn fromSEXP<T>(r: rRinternal::SEXP) -> convertError<T> ;
}
#[derive(Debug,Clone)]
pub struct Rnull;
impl Rnull {
        pub fn create() -> Rnull {
                Rnull
        }
}

impl Robject for Rnull {
        fn t(&self) -> i32 {
               return NILSXP;  
        }
        fn toSexp(&self) ->  rRinternal::SEXP {
                unsafe {
                        return rRinternal::R_NilValue;
                }
        }
        fn l(&self) -> isize {
                return 0;
        }
        fn fromSEXP<Rnull>(r: rRinternal::SEXP) -> convertError<Rnull> {
                return Ok(Rnull::create());
        }
}