+ always allow using @Result in inline asm sections of pascal routines (only in

  pure assembler routines it is disallowed in certain cases)

git-svn-id: trunk@38292 -

compiler/rautils.pas

@@ -684,6 +684,7 @@ begin
       begin
         if (m_tp7 in current_settings.modeswitches) and
           not (df_generic in defoptions) and
+          (po_assembler in procoptions) and
           (not paramanager.ret_in_param(returndef,current_procinfo.procdef)) then
           begin
             message(asmr_e_cannot_use_RESULT_here);