[perl #42475] [PATCH] Change asm() to __asm__()

[via RT]

# New Ticket Created by  Steve Peters 
# Please include the string:  [perl #42475]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=42475 >


-ansi -pedantic choke on the call to asm() in src/ops/core.ops.  This is
because asm() is gcc-builtin.  However, if you use __asm_() instead, everything
works just fine.  The following patch gets Parrot to compile just file,
although rather loudly with -ansi -pedantic.

Steve Peters
[EMAIL PROTECTED]


Index: src/ops/core.ops
===================================================================
--- src/ops/core.ops    (revision 18166)
+++ src/ops/core.ops    (working copy)
@@ -107,7 +107,7 @@
 inline op cpu_ret() {
 #ifdef __GNUC__
 #  ifdef I386
-    asm("ret");
+    __asm__("ret");
 #  endif
 #endif
     goto NEXT();