[COMMITTED] a68: add missing testfile

[Jose E. Marchesi]

---
 gcc/testsuite/algol68/execute/modules/program-6.a68 | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 gcc/testsuite/algol68/execute/modules/program-6.a68

diff --git a/gcc/testsuite/algol68/execute/modules/program-6.a68 b/gcc/testsuite/algol68/execute/modules/program-6.a68
new file mode 100644
index 00000000000..05708fada46
--- /dev/null
+++ b/gcc/testsuite/algol68/execute/modules/program-6.a68
@@ -0,0 +1,9 @@
+{ dg-modules "module6" }
+
+{ New priority is given to an importe operator.  }
+
+access Module_6
+begin assert (2 // 3 = 5);
+      prio // = 9;
+      skip
+end
-- 
2.30.2