1 files changed, 41 insertions, 0 deletions
diff --git a/tests/language-feature/pointer/pointer-access/read-only-pointer-1.slang b/tests/language-feature/pointer/pointer-access/read-only-pointer-1.slang
new file mode 100644
index 000000000..e7f1ad534
--- /dev/null
+++ b/tests/language-feature/pointer/pointer-access/read-only-pointer-1.slang
@@ -0,0 +1,41 @@
+//TEST:SIMPLE(filecheck=CHECK):-stage compute -entry computeMain -target spirv
+
+// Writing with a read-only pointer should be an error
+
+int* processMemory;
+RWStructuredBuffer<int> output;
+
+typealias ReadPtr = Ptr<int, Access::Read, AddressSpace::Device>;
+
+void writeToReadOnlyPointer(ReadPtr ptr)
+{
+    // CHECK: ([[# @LINE+1]]): error 30011
+    ptr[0] = 1;
+}
+
+void writeToReadOnlyPointerOut(out int ptrVal)
+{
+    ptrVal = 1;
+}
+
+[numthreads(1, 1, 1)]
+void computeMain(int id : SV_DispatchThreadID)
+{
+    // CHECK-NOT: ([[# @LINE+1]]): error
+    ReadPtr ptr1 = ReadPtr(processMemory + id.x);
+
+    // CHECK: ([[# @LINE+1]]): error 30011
+    ptr1[id + 1] = 1;
+    // CHECK: ([[# @LINE+1]]): error 30011
+    *ptr1 = 1;
+
+    writeToReadOnlyPointer(ptr1);
+
+    // CHECK: ([[# @LINE+1]]): error 30047
+    writeToReadOnlyPointerOut(ptr1[1]);
+
+    // CHECK: ([[# @LINE+1]]): error 30047
+    writeToReadOnlyPointerOut(*(ptr1+2));
+    
+    output[id] = ptr1[id];
+}