From 8d1660893be11aa243991c52d4dcea7bf4d63a24 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 3 May 2020 15:18:08 +0000
Subject: [PATCH]   * compilation with -Oodfa fixed

git-svn-id: trunk@45234 -
---
 compiler/aarch64/agcpugas.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/compiler/aarch64/agcpugas.pas b/compiler/aarch64/agcpugas.pas
index 2702e2a26e..09f3152273 100644
--- a/compiler/aarch64/agcpugas.pas
+++ b/compiler/aarch64/agcpugas.pas
@@ -65,7 +65,7 @@ unit agcpugas;
         'uxtb','uxth','uxtw','uxtx',
         'sxtb','sxth','sxtw','sxtx');
 
-    const 
+    const
       cputype_to_gas_march : array[tcputype] of string = (
         '', // cpu_none
         'armv8'
@@ -292,6 +292,7 @@ unit agcpugas;
         if not assigned(list) then
           exit;
 
+        lastsym:=nil;
         tmplist:=nil;
         sehlist:=nil;
         lastsec:=nil;
@@ -303,6 +304,8 @@ unit agcpugas;
         handlerdata:=nil;
         handlerdataidx:=0;
         handlerdatacount:=nil;
+        handlerflags:=0;
+        handlername:='';
 
         hp:=tai(list.first);
         while assigned(hp) do