summaryrefslogtreecommitdiff
path: root/rtl/arm
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-03-25 17:54:32 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-03-25 17:54:32 +0000
commita01246c0ee09ffef447ddd019de7054cdee8a11c (patch)
tree46aa0b7f66a07da0d78375cf4d3e4f95a8ace43d /rtl/arm
parent27a46b6634c4419f41646311d012b5abd214215b (diff)
downloadfpc-a01246c0ee09ffef447ddd019de7054cdee8a11c.tar.gz
* disable assembler versions of string routines for arm thumb
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@23998 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/arm')
-rw-r--r--rtl/arm/strings.inc2
1 files changed, 2 insertions, 0 deletions
diff --git a/rtl/arm/strings.inc b/rtl/arm/strings.inc
index 453c0b3326..7066439d3a 100644
--- a/rtl/arm/strings.inc
+++ b/rtl/arm/strings.inc
@@ -15,6 +15,7 @@
**********************************************************************}
+{$ifndef CPUTHUMB}
{$ifndef FPC_UNIT_HAS_STRUPPER}
{$define FPC_UNIT_HAS_STRUPPER}
function strupper(p : pchar) : pchar;assembler;nostackframe;
@@ -74,3 +75,4 @@ asm
b .LByteLoop
end;
{$endif FPC_UNIT_HAS_STRLOWER}
+{$endif CPUTHUMB}