summaryrefslogtreecommitdiff
path: root/test/regression/check-pragmas
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-08 13:56:08 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2010-03-08 13:56:08 +0000
commita24cfb086163ab359735392340acfe03e133be64 (patch)
tree1d878c6fa08338b9955ca79b36b6267bcf6bfbad /test/regression/check-pragmas
parentc24a652789e15b33153c1d90c6869eb6e6e28040 (diff)
Handling of volatile accesses through builtin functions.
Added support for processor-specific builtin functions. Added some PowerPC instructions as builtins. Updated #pragma section handling. git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1285 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'test/regression/check-pragmas')
-rwxr-xr-xtest/regression/check-pragmas18
1 files changed, 18 insertions, 0 deletions
diff --git a/test/regression/check-pragmas b/test/regression/check-pragmas
new file mode 100755
index 0000000..404d687
--- /dev/null
+++ b/test/regression/check-pragmas
@@ -0,0 +1,18 @@
+#!/usr/bin/perl
+
+$sect = 'none';
+
+while(<>) {
+ if (/^ (\.(text|data|sdata|sbss|sdata2))/) {
+ $sect = $1;
+ }
+ if (/^ (\.section.*)/) {
+ $sect = $1;
+ }
+ if (/([A-Za-z_][A-Za-z0-9_]*):/) {
+ printf ("%32s: %s\n", $1, $sect);
+ }
+ if (/([A-Za-z_][A-Za-z0-9_]*)\)?\@sda/) {
+ printf ("%32s: short reference\n", $1);
+ }
+}