1 files changed, 7 insertions, 0 deletions
diff --git a/llvm/test/FrontendAda/vce.adb b/llvm/test/FrontendAda/vce.adb
new file mode 100644
index 00000000000..3d783d04572
--- /dev/null
+++ b/llvm/test/FrontendAda/vce.adb
@@ -0,0 +1,7 @@
+-- RUN: %llvmgcc -c %s -o /dev/null
+procedure VCE is
+  S : String (1 .. 2);
+  B : Character := 'B';
+begin
+  S := 'A' & B;
+end;