From fd61d65313ab6ee7b20d5bd4ae6f6e414a34a53d Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 7 Feb 2016 11:24:47 +0000
Subject: [PATCH] * handle controller type already in the first options pass_1
 * set heapsize for the avrsim controller target to a reasonable size

git-svn-id: trunk@33068 -
---
 compiler/options.pas | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/compiler/options.pas b/compiler/options.pas
index 72b5a332a0..0e76eb08ea 100644
--- a/compiler/options.pas
+++ b/compiler/options.pas
@@ -1007,7 +1007,7 @@ begin
           ((length(opt)>1) and (opt[2] in ['i','d','v','T','u','n','X','l'])) or
           ((length(opt)>3) and (opt[2]='F') and (opt[3]='e')) or
           ((length(opt)>3) and (opt[2]='C') and (opt[3]='p')) or
-          ((length(opt)>3) and (opt[2]='W') and (opt[3]='m'))
+          ((length(opt)>3) and (opt[2]='W') and (opt[3] in ['m','p']))
          )
         ) then
     exit;
@@ -3483,8 +3483,13 @@ begin
   if target_info.system in systems_embedded then
     begin
       case target_info.system of
+{$ifdef AVR}
         system_avr_embedded:
-          heapsize:=128;
+          if init_settings.controllertype=ct_avrsim then
+            heapsize:=8192
+          else
+            heapsize:=128;
+{$endif AVR}
         system_arm_embedded:
           heapsize:=256;
         system_mipsel_embedded: