diff options
author | Norbert Preining <norbert@preining.info> | 2020-10-12 03:04:00 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2020-10-12 03:04:00 +0000 |
commit | 0ce40abb18ec02ec6fd6bcc5f21612c88daa7578 (patch) | |
tree | 416289fe1448873fd8ca33051f50ad85bffa8aaa /support/dktools/dk4mai8hil.ctr | |
parent | fdb18507cd80dc17f5a5256153d34668b4f4e61c (diff) |
CTAN sync 202010120303
Diffstat (limited to 'support/dktools/dk4mai8hil.ctr')
-rw-r--r-- | support/dktools/dk4mai8hil.ctr | 131 |
1 files changed, 0 insertions, 131 deletions
diff --git a/support/dktools/dk4mai8hil.ctr b/support/dktools/dk4mai8hil.ctr deleted file mode 100644 index b9fbf01e7d..0000000000 --- a/support/dktools/dk4mai8hil.ctr +++ /dev/null @@ -1,131 +0,0 @@ -%% options - -copyright owner = Dirk Krause -copyright year = 2015-xxxx -SPDX-License-Identifier: BSD-3-Clause - - - -%% header - -/** @file - Retrieve long value from - 8 bit character string in hexadecimal notation. -*/ - -#ifndef DK4CONF_H_INCLUDED -#if DK4_BUILDING_DKTOOLS4 -#include "dk4conf.h" -#else -#include <dktools-4/dk4conf.h> -#endif -#endif - -#ifndef DK4TYPES_H_INCLUDED -#if DK4_BUILDING_DKTOOLS4 -#include "dk4types.h" -#else -#include <dktools-4/dk4types.h> -#endif -#endif - -#ifndef DK4ERROR_H_INCLUDED -#if DK4_BUILDING_DKTOOLS4 -#include "dk4error.h" -#else -#include <dktools-4/dk4error.h> -#endif -#endif - - - -#ifdef __cplusplus -extern "C" { -#endif - -/** Retrieve numeric value from string, hexadecimal notation. - @param rp Pointer to result variable for the found value. - @param src String to check for numeric value. - @param endptr Address of pointer variable. - A pointer to the first character not processed - is stored here. - The function may also store a NULL pointer in this - variable. - The variable points to the correct error position - only if er.ec is DK4_E_SYNTAX. - @param atg Allow trailing garbage: - 0=no unprocessable trailing bytes allowed, - 1=trailing whitespaces allowed, - 2=any trailing characters allowed. - @param erp Error report, may be NULL. - @return 1 on success, 0 on error. - - Error codes: - DK4_E_INVALID_ARGUMENTS if rp or src is NULL, - DK4_E_MATH_OVERFLOW if the number is out of range, or - DK4_E_SYNTAX if src contains illegal characters. -*/ -int -dk4ma_input_c8_hex_long( - long *rp, - const char *src, - const char **endptr, - int atg, - dk4_er_t *erp -); - -#ifdef __cplusplus -} -#endif - -%% module - -#include "dk4conf.h" - -#if DK4_HAVE_ASSERT_H -#ifndef ASSERT_H_INCLUDED -#include <assert.h> -#define ASSERT_H_INCLUDED 1 -#endif -#endif - -#include "dk4mai8hdi.h" -#include "dk4mai8hil.h" -#include "dk4numco.h" - - - -int -dk4ma_input_c8_hex_long( - long *rp, - const char *src, - const char **endptr, - int atg, - dk4_er_t *erp -) -{ -#if DK4_HAVE_INTMAX_T || DK4_HAVE_LONG_LONG - dk4_im_t res; - int back = 0; -#if DK4_USE_ASSERT - assert(NULL != rp); - assert(NULL != src); -#endif - if (0 != dk4ma_input_c8_hex_dk4_im_t(&res, src, endptr, atg, erp)) { - if (((dk4_im_t)(LONG_MIN) <= res) && (((dk4_im_t)(LONG_MAX)) >= res)) { - *rp = (long)res; - back = 1; - } else { - dk4error_set_simple_error_code(erp, DK4_E_MATH_OVERFLOW); - } - } - return back; -#else -#if DK4_USE_ASSERT - assert(NULL != rp); - assert(NULL != src); -#endif - return (dk4ma_input_c8_hex_dk4_im_t(rp, src, endptr, atg, erp)); -#endif -} - |