diff --git a/runtests.fs b/runtests.fs
index b440abb..38ab946 100644
--- a/runtests.fs
+++ b/runtests.fs
@@ -13,5 +13,7 @@ include test/utilities.fs
 include test/errorreport.fs
 include test/coreexttest.fs
 
+include test/export.fs
+
 report-errors
 report-and-exit
diff --git a/test/export.fs b/test/export.fs
new file mode 100644
index 0000000..ec8b0c0
--- /dev/null
+++ b/test/export.fs
@@ -0,0 +1,31 @@
+\ planckforth -
+\ Copyright (C) 2021 nineties
+
+testing private and export
+
+: f1 ;
+private{
+
+    : f2 ;
+
+    T{ defined? f1 -> true }T
+    T{ defined? f2 -> true }T
+
+    private{
+
+        : f3 ;
+
+        T{ defined? f2 -> true }T
+        T{ defined? f3 -> true }T
+
+    }private
+
+    T{ defined? f1 -> true }T
+    T{ defined? f2 -> true }T
+    T{ defined? f3 -> false }T
+
+}private
+
+T{ defined? f1 -> true }T
+T{ defined? f2 -> false }T
+T{ defined? f3 -> false }T