From 87baa8c43fcc3e840cc17e797e014f1149bada13 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Wed, 2 Mar 2016 01:12:56 +0000
Subject: [PATCH] * in the internal assembler writer, when starting a new
 object file, set the   cputype to current_settings.cputype, instead of
 cpu_none (which indicates no   restrictions)

git-svn-id: trunk@33142 -
---
 compiler/ogbase.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/ogbase.pas b/compiler/ogbase.pas
index f69c763d8b..42bea67e28 100644
--- a/compiler/ogbase.pas
+++ b/compiler/ogbase.pas
@@ -1433,7 +1433,7 @@ implementation
 
     procedure TObjData.beforealloc;
       begin
-        FCPUType:=cpu_none;
+        FCPUType:=current_settings.cputype;
         { create stabs sections if debugging }
         if assigned(StabsSec) then
           begin
@@ -1445,7 +1445,7 @@ implementation
 
     procedure TObjData.beforewrite;
       begin
-        FCPUType:=cpu_none;
+        FCPUType:=current_settings.cputype;
         { create stabs sections if debugging }
         if assigned(StabsSec) then
          begin