mirror of
https://gitee.com/mirrors_PX4/PX4-Autopilot.git
synced 2026-10-15 21:53:34 +08:00
Email address change in misc/
git-svn-id: https://nuttx.svn.sourceforge.net/svnroot/nuttx/trunk@5144 7fd9a85b-ad96-42d3-883c-3090e2eb8679
This commit is contained in:
patacongo
@@ -1,82 +1,82 @@
|
||||
/*************************************************************
|
||||
* keywords.h
|
||||
* This file defines the pascal compilation environment
|
||||
*
|
||||
* Copyright (C) 2008 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
*************************************************************/
|
||||
|
||||
#ifndef __KEYWORDS_H
|
||||
#define __KEYWORDS_H
|
||||
|
||||
/*************************************************************
|
||||
* Included Files
|
||||
*************************************************************/
|
||||
|
||||
#include "config.h"
|
||||
|
||||
/*************************************************************
|
||||
*Pre-processor Definitions
|
||||
*************************************************************/
|
||||
|
||||
#ifndef NULL
|
||||
# define NULL ((void*)0)
|
||||
#endif
|
||||
|
||||
#ifndef CONFIG_DEBUG
|
||||
# define CONFIG_DEBUG 0
|
||||
#endif
|
||||
|
||||
#if CONFIG_DEBUG
|
||||
# define DEBUG(stream, format, arg...) fprintf(stream, format, ##arg)
|
||||
#else
|
||||
# define DEBUG(x...)
|
||||
#endif
|
||||
|
||||
#ifndef CONFIG_TRACE
|
||||
# define CONFIG_TRACE 0
|
||||
#endif
|
||||
|
||||
#if CONFIG_TRACE
|
||||
# define TRACE(stream, format, arg...) fprintf(stream, format, ##arg)
|
||||
#else
|
||||
# define TRACE(x...)
|
||||
#endif
|
||||
|
||||
#define FAR
|
||||
|
||||
#define dbg(...) fprintf(stderr, __VA_ARGS__)
|
||||
#define vdbg(...) DEBUG(__VA_ARGS__)
|
||||
|
||||
#endif /* __KEYWORDS_H */
|
||||
|
||||
|
||||
|
||||
/*************************************************************
|
||||
* keywords.h
|
||||
* This file defines the pascal compilation environment
|
||||
*
|
||||
* Copyright (C) 2008 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
*************************************************************/
|
||||
|
||||
#ifndef __KEYWORDS_H
|
||||
#define __KEYWORDS_H
|
||||
|
||||
/*************************************************************
|
||||
* Included Files
|
||||
*************************************************************/
|
||||
|
||||
#include "config.h"
|
||||
|
||||
/*************************************************************
|
||||
*Pre-processor Definitions
|
||||
*************************************************************/
|
||||
|
||||
#ifndef NULL
|
||||
# define NULL ((void*)0)
|
||||
#endif
|
||||
|
||||
#ifndef CONFIG_DEBUG
|
||||
# define CONFIG_DEBUG 0
|
||||
#endif
|
||||
|
||||
#if CONFIG_DEBUG
|
||||
# define DEBUG(stream, format, arg...) fprintf(stream, format, ##arg)
|
||||
#else
|
||||
# define DEBUG(x...)
|
||||
#endif
|
||||
|
||||
#ifndef CONFIG_TRACE
|
||||
# define CONFIG_TRACE 0
|
||||
#endif
|
||||
|
||||
#if CONFIG_TRACE
|
||||
# define TRACE(stream, format, arg...) fprintf(stream, format, ##arg)
|
||||
#else
|
||||
# define TRACE(x...)
|
||||
#endif
|
||||
|
||||
#define FAR
|
||||
|
||||
#define dbg(...) fprintf(stderr, __VA_ARGS__)
|
||||
#define vdbg(...) DEBUG(__VA_ARGS__)
|
||||
|
||||
#endif /* __KEYWORDS_H */
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* External Declarations associated with paslib
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* Common definitions
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* Definitions of error codes
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* External Declarations associated with perr.c
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -1,93 +1,93 @@
|
||||
/***********************************************************************
|
||||
* pfdefs.h
|
||||
* Floating point operation codes
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
***********************************************************************/
|
||||
|
||||
#ifndef __PFDEFS_H
|
||||
#define __PFDEFS_H
|
||||
|
||||
/***********************************************************************
|
||||
* FLOATING POINT SUB-OPCODES
|
||||
***********************************************************************/
|
||||
|
||||
/* This bit may be set in the opcode to indicate that the arguments
|
||||
* is(are) type integer and require(s) conversion. */
|
||||
|
||||
#define fpARG1 (0x40)
|
||||
#define fpARG2 (0x80)
|
||||
#define fpMASK (0x3f)
|
||||
#define fpSHIFT 6
|
||||
|
||||
/* The "INVALID" floating point operation */
|
||||
|
||||
#define fpINVLD (0x00)
|
||||
|
||||
/* Floating Pointer Conversions (On 16-bit stack argument: FP or Integer) */
|
||||
|
||||
#define fpFLOAT (0x01)
|
||||
#define fpTRUNC (0x02)
|
||||
#define fpROUND (0x03)
|
||||
|
||||
/* Floating Point arithmetic instructions (Two FP 16-bit stack arguments) */
|
||||
|
||||
#define fpADD (0x04)
|
||||
#define fpSUB (0x05)
|
||||
#define fpMUL (0x06)
|
||||
#define fpDIV (0x07)
|
||||
#define fpMOD (0x08)
|
||||
|
||||
/* Floating Point Comparisons (Two FP 16-bit stack arguments) */
|
||||
|
||||
#define fpEQU (0x0a)
|
||||
#define fpNEQ (0x0b)
|
||||
#define fpLT (0x0c)
|
||||
#define fpGTE (0x0d)
|
||||
#define fpGT (0x0e)
|
||||
#define fpLTE (0x0f)
|
||||
|
||||
/* Floating Point arithmetic instructions (One FP 16-bit stack arguments) */
|
||||
|
||||
#define fpNEG (0x10)
|
||||
#define fpABS (0x11)
|
||||
#define fpSQR (0x12)
|
||||
#define fpSQRT (0x13)
|
||||
#define fpSIN (0x14)
|
||||
#define fpCOS (0x15)
|
||||
#define fpATAN (0x16)
|
||||
#define fpLN (0x17)
|
||||
#define fpEXP (0x18)
|
||||
|
||||
#define MAX_FOP (0x19) /* Number of floating point operations */
|
||||
|
||||
#endif /* __PFDEFS_H */
|
||||
/***********************************************************************
|
||||
* pfdefs.h
|
||||
* Floating point operation codes
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
***********************************************************************/
|
||||
|
||||
#ifndef __PFDEFS_H
|
||||
#define __PFDEFS_H
|
||||
|
||||
/***********************************************************************
|
||||
* FLOATING POINT SUB-OPCODES
|
||||
***********************************************************************/
|
||||
|
||||
/* This bit may be set in the opcode to indicate that the arguments
|
||||
* is(are) type integer and require(s) conversion. */
|
||||
|
||||
#define fpARG1 (0x40)
|
||||
#define fpARG2 (0x80)
|
||||
#define fpMASK (0x3f)
|
||||
#define fpSHIFT 6
|
||||
|
||||
/* The "INVALID" floating point operation */
|
||||
|
||||
#define fpINVLD (0x00)
|
||||
|
||||
/* Floating Pointer Conversions (On 16-bit stack argument: FP or Integer) */
|
||||
|
||||
#define fpFLOAT (0x01)
|
||||
#define fpTRUNC (0x02)
|
||||
#define fpROUND (0x03)
|
||||
|
||||
/* Floating Point arithmetic instructions (Two FP 16-bit stack arguments) */
|
||||
|
||||
#define fpADD (0x04)
|
||||
#define fpSUB (0x05)
|
||||
#define fpMUL (0x06)
|
||||
#define fpDIV (0x07)
|
||||
#define fpMOD (0x08)
|
||||
|
||||
/* Floating Point Comparisons (Two FP 16-bit stack arguments) */
|
||||
|
||||
#define fpEQU (0x0a)
|
||||
#define fpNEQ (0x0b)
|
||||
#define fpLT (0x0c)
|
||||
#define fpGTE (0x0d)
|
||||
#define fpGT (0x0e)
|
||||
#define fpLTE (0x0f)
|
||||
|
||||
/* Floating Point arithmetic instructions (One FP 16-bit stack arguments) */
|
||||
|
||||
#define fpNEG (0x10)
|
||||
#define fpABS (0x11)
|
||||
#define fpSQR (0x12)
|
||||
#define fpSQRT (0x13)
|
||||
#define fpSIN (0x14)
|
||||
#define fpCOS (0x15)
|
||||
#define fpATAN (0x16)
|
||||
#define fpLN (0x17)
|
||||
#define fpEXP (0x18)
|
||||
|
||||
#define MAX_FOP (0x19) /* Number of floating point operations */
|
||||
|
||||
#endif /* __PFDEFS_H */
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* External Declarations associated libinsn.a
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* Logical P-code operation code definitions
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* Definitions for the PCode Object File Format (POFF)
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
* Interfaces to the POFF library
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
||||
+232
-232
@@ -1,232 +1,232 @@
|
||||
/***********************************************************************
|
||||
* pxdefs.h
|
||||
* Definitions of the arguments of the oSYSIO opcode
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <spudmonkey@racsa.co.cr>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
***********************************************************************/
|
||||
|
||||
#ifndef __PXDEFS_H
|
||||
#define __PXDEFS_H
|
||||
|
||||
/***********************************************************************/
|
||||
/* Codes for system IO calls associated with standard Pascal procedure
|
||||
* and function calls. These must be confined to the range 0x0000
|
||||
* through 0xffff.
|
||||
*/
|
||||
|
||||
#define xEOF (0x0001)
|
||||
#define xEOLN (0x0002)
|
||||
#define xRESET (0x0003)
|
||||
#define xREWRITE (0x0004)
|
||||
|
||||
#define xREADLN (0x0010)
|
||||
#define xREAD_PAGE (0x0011)
|
||||
#define xREAD_BINARY (0x0012)
|
||||
#define xREAD_INT (0x0013)
|
||||
#define xREAD_CHAR (0x0014)
|
||||
#define xREAD_STRING (0x0015)
|
||||
#define xREAD_REAL (0x0016)
|
||||
|
||||
#define xWRITELN (0x0020)
|
||||
#define xWRITE_PAGE (0x0021)
|
||||
#define xWRITE_BINARY (0x0022)
|
||||
#define xWRITE_INT (0x0023)
|
||||
#define xWRITE_CHAR (0x0024)
|
||||
#define xWRITE_STRING (0x0025)
|
||||
#define xWRITE_REAL (0x0026)
|
||||
|
||||
#define MAX_XOP (0x0027)
|
||||
|
||||
/***********************************************************************/
|
||||
/* Codes for runtime library interfaces. These must be confined to the
|
||||
* range 0x0000 through 0xffff.
|
||||
*/
|
||||
|
||||
/* Get an environment string.
|
||||
* function getent(name : string) : cstring;
|
||||
* ON INPUT:
|
||||
* TOS(0)=length of string
|
||||
* TOS(1)=pointer to string
|
||||
* ON RETURN: actual parameters released
|
||||
* TOS(0,1)=32-bit absolute address of string
|
||||
*/
|
||||
|
||||
#define lbGETENV (0x0000)
|
||||
|
||||
/* Copy pascal string to a pascal string
|
||||
* procedure str2str(src : string; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string
|
||||
* TOS(1)=length of source string
|
||||
* TOS(2)=pointer to source string
|
||||
* ON RETURN: actual parameters released.
|
||||
*/
|
||||
|
||||
#define lbSTR2STR (0x0001)
|
||||
|
||||
/* Copy C string to a pascal string
|
||||
* procedure cstr2str(src : cstring; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string
|
||||
* TOS(1,2)=32-bit absolute address of C string
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbCSTR2STR (0x0002)
|
||||
|
||||
/* Copy pascal string to a pascal string reference
|
||||
* procedure str2rstr(src : string; var dest : rstring)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string reference
|
||||
* TOS(1)=length of source string
|
||||
* TOS(2)=pointer to source string
|
||||
* ON RETURN: actual parameters released.
|
||||
*/
|
||||
|
||||
#define lbSTR2RSTR (0x0003)
|
||||
|
||||
/* Copy C string to a pascal string reference
|
||||
* procedure cstr2str(src : cstring; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string reference
|
||||
* TOS(0)=MS 16-bits of 32-bit C source string pointer
|
||||
* TOS(1)=LS 16-bits of 32-bit C source string pointer
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbCSTR2RSTR (0x0004)
|
||||
|
||||
/* Convert a string to a numeric value
|
||||
* procedure val(const s : string; var v; var code : word);
|
||||
*
|
||||
* Description:
|
||||
* val() converts the value represented in the string S to a numerical
|
||||
* value, and stores this value in the variable V, which can be of type
|
||||
* Longint, Real and Byte. If the conversion isn¡Çt succesfull, then the
|
||||
* parameter Code contains the index of the character in S which
|
||||
* prevented the conversion. The string S is allowed to contain spaces
|
||||
* in the beginning.
|
||||
*
|
||||
* The string S can contain a number in decimal, hexadecimal, binary or
|
||||
* octal format, as described in the language reference.
|
||||
*
|
||||
* Errors:
|
||||
* If the conversion doesn¡Çt succeed, the value of Code indicates the
|
||||
* position where the conversion went wrong.
|
||||
*
|
||||
* ON INPUT
|
||||
* TOS(0)=address of Code
|
||||
* TOS(1)=address of v
|
||||
* TOS(2)=length of source string
|
||||
* TOS(3)=pointer to source string
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbVAL (0x0005)
|
||||
|
||||
/* Create an empty string
|
||||
* function mkstk : string;
|
||||
* ON INPUT
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTK (0x0006)
|
||||
|
||||
/* Replace a string with a duplicate string residing in allocated
|
||||
* string stack.
|
||||
* function mkstkstr(name : string) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=length of original string
|
||||
* TOS(1)=pointer to original string
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTKSTR (0x0007)
|
||||
|
||||
/* Replace a character with a string residing in allocated string stack.
|
||||
* function mkstkc(c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=Character value
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTKC (0x0008)
|
||||
|
||||
/* Concatenate a string to the end of a string.
|
||||
* function strcat(name : string, c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=length of string
|
||||
* TOS(1)=pointer to string
|
||||
* TOS(2)=length of string
|
||||
* TOS(3)=pointer to string
|
||||
* ON OUTPUT
|
||||
* TOS(1)=new length of string
|
||||
* TOS(2)=pointer to string
|
||||
*/
|
||||
|
||||
#define lbSTRCAT (0x0009)
|
||||
|
||||
/* Concatenate a character to the end of a string.
|
||||
* function strcatc(name : string, c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=character to concatenate
|
||||
* TOS(1)=length of string
|
||||
* TOS(2)=pointer to string
|
||||
* ON OUTPUT
|
||||
* TOS(1)=new length of string
|
||||
* TOS(2)=pointer to string
|
||||
*/
|
||||
|
||||
#define lbSTRCATC (0x000a)
|
||||
|
||||
/* Compare two pascal strings
|
||||
* function strcmp(name1 : string, name2 : string) : integer;
|
||||
* ON INPUT
|
||||
* TOS(1)=length of string2
|
||||
* TOS(2)=address of string2 data
|
||||
* TOS(3)=length of string1
|
||||
* TOS(4)=address of string1 data
|
||||
* ON OUTPUT
|
||||
* TOS(0)=(-1=less than, 0=equal, 1=greater than}
|
||||
*/
|
||||
|
||||
#define lbSTRCMP (0x000b)
|
||||
|
||||
#define MAX_LBOP (0x000c)
|
||||
|
||||
#endif /* __PXDEFS_H */
|
||||
/***********************************************************************
|
||||
* pxdefs.h
|
||||
* Definitions of the arguments of the oSYSIO opcode
|
||||
*
|
||||
* Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
|
||||
* Author: Gregory Nutt <gnutt@nuttx.org>
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in
|
||||
* the documentation and/or other materials provided with the
|
||||
* distribution.
|
||||
* 3. Neither the name NuttX nor the names of its contributors may be
|
||||
* used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
||||
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
||||
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
|
||||
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
|
||||
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
***********************************************************************/
|
||||
|
||||
#ifndef __PXDEFS_H
|
||||
#define __PXDEFS_H
|
||||
|
||||
/***********************************************************************/
|
||||
/* Codes for system IO calls associated with standard Pascal procedure
|
||||
* and function calls. These must be confined to the range 0x0000
|
||||
* through 0xffff.
|
||||
*/
|
||||
|
||||
#define xEOF (0x0001)
|
||||
#define xEOLN (0x0002)
|
||||
#define xRESET (0x0003)
|
||||
#define xREWRITE (0x0004)
|
||||
|
||||
#define xREADLN (0x0010)
|
||||
#define xREAD_PAGE (0x0011)
|
||||
#define xREAD_BINARY (0x0012)
|
||||
#define xREAD_INT (0x0013)
|
||||
#define xREAD_CHAR (0x0014)
|
||||
#define xREAD_STRING (0x0015)
|
||||
#define xREAD_REAL (0x0016)
|
||||
|
||||
#define xWRITELN (0x0020)
|
||||
#define xWRITE_PAGE (0x0021)
|
||||
#define xWRITE_BINARY (0x0022)
|
||||
#define xWRITE_INT (0x0023)
|
||||
#define xWRITE_CHAR (0x0024)
|
||||
#define xWRITE_STRING (0x0025)
|
||||
#define xWRITE_REAL (0x0026)
|
||||
|
||||
#define MAX_XOP (0x0027)
|
||||
|
||||
/***********************************************************************/
|
||||
/* Codes for runtime library interfaces. These must be confined to the
|
||||
* range 0x0000 through 0xffff.
|
||||
*/
|
||||
|
||||
/* Get an environment string.
|
||||
* function getent(name : string) : cstring;
|
||||
* ON INPUT:
|
||||
* TOS(0)=length of string
|
||||
* TOS(1)=pointer to string
|
||||
* ON RETURN: actual parameters released
|
||||
* TOS(0,1)=32-bit absolute address of string
|
||||
*/
|
||||
|
||||
#define lbGETENV (0x0000)
|
||||
|
||||
/* Copy pascal string to a pascal string
|
||||
* procedure str2str(src : string; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string
|
||||
* TOS(1)=length of source string
|
||||
* TOS(2)=pointer to source string
|
||||
* ON RETURN: actual parameters released.
|
||||
*/
|
||||
|
||||
#define lbSTR2STR (0x0001)
|
||||
|
||||
/* Copy C string to a pascal string
|
||||
* procedure cstr2str(src : cstring; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string
|
||||
* TOS(1,2)=32-bit absolute address of C string
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbCSTR2STR (0x0002)
|
||||
|
||||
/* Copy pascal string to a pascal string reference
|
||||
* procedure str2rstr(src : string; var dest : rstring)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string reference
|
||||
* TOS(1)=length of source string
|
||||
* TOS(2)=pointer to source string
|
||||
* ON RETURN: actual parameters released.
|
||||
*/
|
||||
|
||||
#define lbSTR2RSTR (0x0003)
|
||||
|
||||
/* Copy C string to a pascal string reference
|
||||
* procedure cstr2str(src : cstring; var dest : string)
|
||||
* ON INPUT:
|
||||
* TOS(0)=address of dest string reference
|
||||
* TOS(0)=MS 16-bits of 32-bit C source string pointer
|
||||
* TOS(1)=LS 16-bits of 32-bit C source string pointer
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbCSTR2RSTR (0x0004)
|
||||
|
||||
/* Convert a string to a numeric value
|
||||
* procedure val(const s : string; var v; var code : word);
|
||||
*
|
||||
* Description:
|
||||
* val() converts the value represented in the string S to a numerical
|
||||
* value, and stores this value in the variable V, which can be of type
|
||||
* Longint, Real and Byte. If the conversion isn¡Çt succesfull, then the
|
||||
* parameter Code contains the index of the character in S which
|
||||
* prevented the conversion. The string S is allowed to contain spaces
|
||||
* in the beginning.
|
||||
*
|
||||
* The string S can contain a number in decimal, hexadecimal, binary or
|
||||
* octal format, as described in the language reference.
|
||||
*
|
||||
* Errors:
|
||||
* If the conversion doesn¡Çt succeed, the value of Code indicates the
|
||||
* position where the conversion went wrong.
|
||||
*
|
||||
* ON INPUT
|
||||
* TOS(0)=address of Code
|
||||
* TOS(1)=address of v
|
||||
* TOS(2)=length of source string
|
||||
* TOS(3)=pointer to source string
|
||||
* ON RETURN: actual parameters released
|
||||
*/
|
||||
|
||||
#define lbVAL (0x0005)
|
||||
|
||||
/* Create an empty string
|
||||
* function mkstk : string;
|
||||
* ON INPUT
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTK (0x0006)
|
||||
|
||||
/* Replace a string with a duplicate string residing in allocated
|
||||
* string stack.
|
||||
* function mkstkstr(name : string) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=length of original string
|
||||
* TOS(1)=pointer to original string
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTKSTR (0x0007)
|
||||
|
||||
/* Replace a character with a string residing in allocated string stack.
|
||||
* function mkstkc(c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=Character value
|
||||
* ON RETURN
|
||||
* TOS(0)=length of new string
|
||||
* TOS(1)=pointer to new string
|
||||
*/
|
||||
|
||||
#define lbMKSTKC (0x0008)
|
||||
|
||||
/* Concatenate a string to the end of a string.
|
||||
* function strcat(name : string, c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=length of string
|
||||
* TOS(1)=pointer to string
|
||||
* TOS(2)=length of string
|
||||
* TOS(3)=pointer to string
|
||||
* ON OUTPUT
|
||||
* TOS(1)=new length of string
|
||||
* TOS(2)=pointer to string
|
||||
*/
|
||||
|
||||
#define lbSTRCAT (0x0009)
|
||||
|
||||
/* Concatenate a character to the end of a string.
|
||||
* function strcatc(name : string, c : char) : string;
|
||||
* ON INPUT
|
||||
* TOS(0)=character to concatenate
|
||||
* TOS(1)=length of string
|
||||
* TOS(2)=pointer to string
|
||||
* ON OUTPUT
|
||||
* TOS(1)=new length of string
|
||||
* TOS(2)=pointer to string
|
||||
*/
|
||||
|
||||
#define lbSTRCATC (0x000a)
|
||||
|
||||
/* Compare two pascal strings
|
||||
* function strcmp(name1 : string, name2 : string) : integer;
|
||||
* ON INPUT
|
||||
* TOS(1)=length of string2
|
||||
* TOS(2)=address of string2 data
|
||||
* TOS(3)=length of string1
|
||||
* TOS(4)=address of string1 data
|
||||
* ON OUTPUT
|
||||
* TOS(0)=(-1=less than, 0=equal, 1=greater than}
|
||||
*/
|
||||
|
||||
#define lbSTRCMP (0x000b)
|
||||
|
||||
#define MAX_LBOP (0x000c)
|
||||
|
||||
#endif /* __PXDEFS_H */
|
||||
|
||||
Reference in New Issue
Block a user