From 99f92ce5dda2fee4170b359c5163060986b4ea78 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 30 Jul 2019 21:04:32 +0000
Subject: [PATCH] * insert FPC_THROWFPUEXCEPTION call into the correct
 assembler list

git-svn-id: trunk@42540 -
---
 compiler/arm/cgcpu.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/arm/cgcpu.pas b/compiler/arm/cgcpu.pas
index 6e0b809619..c26baf81a4 100644
--- a/compiler/arm/cgcpu.pas
+++ b/compiler/arm/cgcpu.pas
@@ -1741,7 +1741,7 @@ unit cgcpu;
             ai.condition:=C_EQ;
             list.concat(ai);
             alloccpuregisters(list,R_INTREGISTER,paramanager.get_volatile_registers_int(pocall_default));
-            cg.a_call_name(current_asmdata.CurrAsmList,'FPC_THROWFPUEXCEPTION',false);
+            cg.a_call_name(list,'FPC_THROWFPUEXCEPTION',false);
             dealloccpuregisters(list,R_INTREGISTER,paramanager.get_volatile_registers_int(pocall_default));
             a_label(list,l);
             if clear then