sdcc-3.9.0 fork implementing GNU assembler syntax

This fork aims to provide better support for stm8-binutils

1 files changed, 65 insertions, 0 deletions

diff --git a/device/lib/pic14/libsdcc/regular/_gptrput1.S b/device/lib/pic14/libsdcc/regular/_gptrput1.S
new file mode 100644
index 0000000..32adfba
--- /dev/null
+++ b/device/lib/pic14/libsdcc/regular/_gptrput1.S
@@ -0,0 +1,65 @@
+; -------------------------------------------------------------------------
+;  _gptrput1.S : write one byte pointed to by a generic pointer
+;
+;  Copyright (C) 2005, Raphael Neider <rneider AT web.de>
+;
+;  This library is free software; you can redistribute it and/or modify it
+;  under the terms of the GNU General Public License as published by the
+;  Free Software Foundation; either version 2, or (at your option) any
+;  later version.
+;
+;  This library is distributed in the hope that it will be useful,
+;  but WITHOUT ANY WARRANTY; without even the implied warranty of
+;  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;  GNU General Public License for more details.
+;
+;  You should have received a copy of the GNU General Public License 
+;  along with this library; see the file COPYING. If not, write to the
+;  Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
+;   MA 02110-1301, USA.
+;
+;  As a special exception, if you link this library with other files,
+;  some of which are compiled with SDCC, to produce an executable,
+;  this library does not by itself cause the resulting executable to
+;  be covered by the GNU General Public License. This exception does
+;  not however invalidate any other reasons why the executable file
+;  might be covered by the GNU General Public License.
+;--------------------------------------------------------------------------
+
+; calling conventions:
+;   3 byte generic pointer is passed in via (WREG STK00 STK01).
+;   The result is returned in (WREG (STK00 (STK01 (STK02)))).
+;
+;   unsigned char _gptrget  (void *gptr);
+;   unsigned char _gptrget1 (void *gptr);
+;   unsigned int  _gptrget2 (void *gptr);
+;   void *        _gptrget3 (void *gptr);
+;   unsigned long _gptrget4 (void *gptr);
+;
+;   void _gptrput  (void *ptr, unsigned char val);
+;   void _gptrput1 (void *ptr, unsigned char val);
+;   void _gptrput2 (void *ptr, unsigned int  val);
+;   void _gptrput3 (void *ptr, unsigned int  val);
+;   void _gptrput4 (void *ptr, unsigned long val);
+
+include macros.inc
+include p16f_common.inc
+
+	global	__gptrput
+	global	__gptrput1
+	
+	CODE
+
+__gptrput:
+__gptrput1:
+	check_data	__dataptrput1
+	; cannot write to __code space
+	return
+
+__dataptrput1:
+	setup_fsr
+	movf	STK02, W	; get LSB(val)
+	movwf	_INDF		; store LSB
+	return
+
+	END