diff --git a/NAMESPACE b/NAMESPACE
index 6a56131..7bae40c 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -22,8 +22,6 @@ export(read_codes)
 export(rev_compl)
 export(shift)
 export(split)
-export(test.demo)
-export(test_demo)
 export(truncate)
 export(tsize)
 export(tuples_freq)
diff --git a/R/r_name.R b/R/r_name.R
deleted file mode 100644
index 6ddbd8d..0000000
--- a/R/r_name.R
+++ /dev/null
@@ -1,5 +0,0 @@
-# Workaround as long as r_name option in rextendr-annotation does not work.
-# We export the functions explicitly here.
-
-#' @export
-test.demo <- function() .Call(wrap__test_demo)
\ No newline at end of file
diff --git a/src/rust/src/lib.rs b/src/rust/src/lib.rs
index 68f5b61..e6d6820 100644
--- a/src/rust/src/lib.rs
+++ b/src/rust/src/lib.rs
@@ -20,22 +20,10 @@ fn r_all_tuples(n: u16, sigma: Vec<String>) -> Vec<String> {
     tuples::all_tuples(n, &sigma)
 }
 
-// test.demo <- function() .Call(wrap__test_demo)
-// r_name is not yet working. Workaround in R/r_name.R:
-/// @export
-#[extendr(r_name = "test.demo")]
-pub fn test_demo() -> Vec<i32> {
-    let _rv = R!("c(1, 2, 3)").unwrap();
-    // let v : RColumn<&[f64]> = rv.as_vector().unwrap();
-    // let i = v.data()[0];
-    vec![1, 2, 3]
-}
-
 // Macro to generate exports.
 // This ensures exported functions are registered with R.
 // See corresponding C code in `entrypoint.c`.
 extendr_module! {
     mod gcatbase; // like R package name
     fn r_all_tuples;
-    fn test_demo;
 }