diff --git a/compiler/rautils.pas b/compiler/rautils.pas
index 79d367db6e..c3bc961414 100644
--- a/compiler/rautils.pas
+++ b/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);