diff --git a/xa/tests/ppstrings/Makefile b/xa/tests/ppstrings/Makefile
new file mode 100644
index 0000000..59593c0
--- /dev/null
+++ b/xa/tests/ppstrings/Makefile
@@ -0,0 +1,6 @@
+default:
+	../../xa test.s -o test.o
+	../hextool -cmp=ok < test.o
+
+clean:
+	rm -f *.o
diff --git a/xa/tests/ppstrings/ok b/xa/tests/ppstrings/ok
new file mode 100644
index 0000000..64104b3
Binary files /dev/null and b/xa/tests/ppstrings/ok differ
diff --git a/xa/tests/ppstrings/test.s b/xa/tests/ppstrings/test.s
new file mode 100644
index 0000000..ba9f521
--- /dev/null
+++ b/xa/tests/ppstrings/test.s
@@ -0,0 +1,15 @@
+
+#define DUP 123
+
+    .asc "DUP^@"
+
+    .asc '0DUP^@'
+
+    .asc "D","UP^@"
+
+    .asc "DUP
+
+    .asc "DU0
+
+    .asc "DU
+