summaryrefslogtreecommitdiff
path: root/support/dktools/dk4maodo.ctr
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-09-20 03:03:26 +0000
committerNorbert Preining <norbert@preining.info>2020-09-20 03:03:26 +0000
commit1f457376b478257b88d4a857f5ec1b6155442dd7 (patch)
tree2a06a60551dea362cf8cb0cb0ba66c78608717c4 /support/dktools/dk4maodo.ctr
parentac690ca29ad5bf8a5203a65fd6252f7b564f4727 (diff)
CTAN sync 202009200303
Diffstat (limited to 'support/dktools/dk4maodo.ctr')
-rw-r--r--support/dktools/dk4maodo.ctr27
1 files changed, 26 insertions, 1 deletions
diff --git a/support/dktools/dk4maodo.ctr b/support/dktools/dk4maodo.ctr
index 04a826d1b9..9e91dfc27a 100644
--- a/support/dktools/dk4maodo.ctr
+++ b/support/dktools/dk4maodo.ctr
@@ -2,7 +2,7 @@
copyright owner = Dirk Krause
copyright year = 2015-xxxx
-license = bsd
+SPDX-License-Identifier: BSD-3-Clause
@@ -12,15 +12,27 @@ license = bsd
*/
#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
@@ -28,6 +40,8 @@ extern "C" {
#endif
/** Write unsigned number to char string in octal notation.
+
+ CRT on Windows: Optional.
@param dptr Pointer to buffer for string.
@param sz Buffer size (number of char).
@param val Value to write.
@@ -47,8 +61,15 @@ dk4ma_write_octal_unsigned(
%% module
+#include "dk4conf.h"
#include "dk4maodo.h"
+#if DK4_HAVE_ASSERT_H
+#ifndef ASSERT_H_INCLUDED
+#include <assert.h>
+#define ASSERT_H_INCLUDED 1
+#endif
+#endif
$!trace-include
@@ -66,6 +87,10 @@ dk4ma_write_octal_unsigned(
int cc = 1; /* Flag: Can continue */
int err = 0; /* Flag: Error occured */
int back = 0; /* Result */
+#if DK4_USE_ASSERT
+ assert(NULL != dptr);
+ assert(0 < sz);
+#endif
if ((NULL != dptr) && (0 < sz)) { *dptr = dkT('\0'); }
if (1 == padsz) {
padsz = (8 * sizeof(dk4_um_t)) / 3;