diff --git a/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract.gno b/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract.gno
new file mode 100644
index 00000000000..0ddb332289d
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract.gno
@@ -0,0 +1,11 @@
+package token_lib
+
+import "std"
+
+func TestGetCaller() {
+	//println("token_lib.TestGetCaller=", std.GetCaller())
+}
+
+func TestGetOrigCaller() {
+	println("token_lib.TestGetOrigCaller=", std.GetOrigCaller())
+}
diff --git a/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract_test.gno b/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract_test.gno
new file mode 100644
index 00000000000..62fb29461aa
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/a_token_lib/contract_test.gno
@@ -0,0 +1,14 @@
+package token_lib
+
+import (
+	"std"
+	"testing"
+
+	"gno.land/p/demo/testutils"
+)
+
+func Test(t testing.T) {
+	std.TestSetOrigCaller(testutils.TestAddress("foobar"))
+	// GetCaller()
+	GetOrigCaller()
+}
diff --git a/examples/gno.land/r/demo/x/caller_patterns/b_token_realm/contract.gno b/examples/gno.land/r/demo/x/caller_patterns/b_token_realm/contract.gno
new file mode 100644
index 00000000000..4bb7e18babe
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/b_token_realm/contract.gno
@@ -0,0 +1,11 @@
+package token_lib
+
+import "std"
+
+func TestGetCaller() {
+	println("token_lib.TestGetCaller=", std.GetCaller())
+}
+
+func TestGetOrigCaller() {
+	println("token_lib.TestGetOrigCaller=", std.GetOrigCaller())
+}
diff --git a/examples/gno.land/r/demo/x/caller_patterns/c_utility_lib/contract.gno b/examples/gno.land/r/demo/x/caller_patterns/c_utility_lib/contract.gno
new file mode 100644
index 00000000000..4bb7e18babe
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/c_utility_lib/contract.gno
@@ -0,0 +1,11 @@
+package token_lib
+
+import "std"
+
+func TestGetCaller() {
+	println("token_lib.TestGetCaller=", std.GetCaller())
+}
+
+func TestGetOrigCaller() {
+	println("token_lib.TestGetOrigCaller=", std.GetOrigCaller())
+}
diff --git a/examples/gno.land/r/demo/x/caller_patterns/d_vault_or_multisig/contract.gno b/examples/gno.land/r/demo/x/caller_patterns/d_vault_or_multisig/contract.gno
new file mode 100644
index 00000000000..4bb7e18babe
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/d_vault_or_multisig/contract.gno
@@ -0,0 +1,11 @@
+package token_lib
+
+import "std"
+
+func TestGetCaller() {
+	println("token_lib.TestGetCaller=", std.GetCaller())
+}
+
+func TestGetOrigCaller() {
+	println("token_lib.TestGetOrigCaller=", std.GetOrigCaller())
+}
diff --git a/examples/gno.land/r/demo/x/caller_patterns/e_another_utility_lib/contract.gno b/examples/gno.land/r/demo/x/caller_patterns/e_another_utility_lib/contract.gno
new file mode 100644
index 00000000000..4bb7e18babe
--- /dev/null
+++ b/examples/gno.land/r/demo/x/caller_patterns/e_another_utility_lib/contract.gno
@@ -0,0 +1,11 @@
+package token_lib
+
+import "std"
+
+func TestGetCaller() {
+	println("token_lib.TestGetCaller=", std.GetCaller())
+}
+
+func TestGetOrigCaller() {
+	println("token_lib.TestGetOrigCaller=", std.GetOrigCaller())
+}