summaryrefslogtreecommitdiff
path: root/gcc/ada/xsnamest.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/xsnamest.adb')
-rw-r--r--gcc/ada/xsnamest.adb8
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/ada/xsnamest.adb b/gcc/ada/xsnamest.adb
index 7dd3ca29883..d044fb1130e 100644
--- a/gcc/ada/xsnamest.adb
+++ b/gcc/ada/xsnamest.adb
@@ -194,6 +194,10 @@ begin
Create (OutB, Out_File, "snames.nb");
Create (OutH, Out_File, "snames.nh");
+ Put_Line (OutH, "#ifdef __cplusplus");
+ Put_Line (OutH, "extern ""C"" {");
+ Put_Line (OutH, "#endif");
+
Anchored_Mode := True;
Val := 0;
@@ -274,4 +278,8 @@ begin
Line := Get_Line (InH);
Put_Line (OutH, Line);
end loop;
+
+ Put_Line (OutH, "#ifdef __cplusplus");
+ Put_Line (OutH, "}");
+ Put_Line (OutH, "#endif");
end XSnamesT;