1 /* do not edit automatically generated by mc from mcMetaError. */
2 /* mcMetaError.def provides a set of high level error routines.
4 Copyright (C) 2015-2024 Free Software Foundation, Inc.
5 Contributed by Gaius Mulley <gaius.mulley@southwales.ac.uk>.
7 This file is part of GNU Modula-2.
9 GNU Modula-2 is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3, or (at your option)
14 GNU Modula-2 is distributed in the hope that it will be useful, but
15 WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with GNU Modula-2; see the file COPYING3. If not see
21 <http://www.gnu.org/licenses/>. */
24 #if !defined (_mcMetaError_H)
25 # define _mcMetaError_H
33 # if !defined (PROC_D)
35 typedef void (*PROC_t
) (void);
36 typedef struct { PROC_t proc
; } PROC
;
40 # include "GDynamicStrings.h"
42 # if defined (_mcMetaError_C)
45 # define EXTERN extern
48 EXTERN
void mcMetaError_metaError1 (const char *m_
, unsigned int _m_high
, const unsigned char *s_
, unsigned int _s_high
);
49 EXTERN
void mcMetaError_metaError2 (const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
50 EXTERN
void mcMetaError_metaError3 (const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
51 EXTERN
void mcMetaError_metaError4 (const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);
52 EXTERN
void mcMetaError_metaErrors1 (const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s_
, unsigned int _s_high
);
53 EXTERN
void mcMetaError_metaErrors2 (const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
54 EXTERN
void mcMetaError_metaErrors3 (const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
55 EXTERN
void mcMetaError_metaErrors4 (const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);
56 EXTERN
void mcMetaError_metaErrorT1 (unsigned int tok
, const char *m_
, unsigned int _m_high
, const unsigned char *s_
, unsigned int _s_high
);
57 EXTERN
void mcMetaError_metaErrorT2 (unsigned int tok
, const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
58 EXTERN
void mcMetaError_metaErrorT3 (unsigned int tok
, const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
59 EXTERN
void mcMetaError_metaErrorT4 (unsigned int tok
, const char *m_
, unsigned int _m_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);
60 EXTERN
void mcMetaError_metaErrorsT1 (unsigned int tok
, const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s_
, unsigned int _s_high
);
61 EXTERN
void mcMetaError_metaErrorsT2 (unsigned int tok
, const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
62 EXTERN
void mcMetaError_metaErrorsT3 (unsigned int tok
, const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
63 EXTERN
void mcMetaError_metaErrorsT4 (unsigned int tok
, const char *m1_
, unsigned int _m1_high
, const char *m2_
, unsigned int _m2_high
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);
64 EXTERN
void mcMetaError_metaErrorString1 (DynamicStrings_String m
, const unsigned char *s_
, unsigned int _s_high
);
65 EXTERN
void mcMetaError_metaErrorString2 (DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
66 EXTERN
void mcMetaError_metaErrorString3 (DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
67 EXTERN
void mcMetaError_metaErrorString4 (DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);
68 EXTERN
void mcMetaError_metaErrorStringT1 (unsigned int tok
, DynamicStrings_String m
, const unsigned char *s_
, unsigned int _s_high
);
69 EXTERN
void mcMetaError_metaErrorStringT2 (unsigned int tok
, DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
);
70 EXTERN
void mcMetaError_metaErrorStringT3 (unsigned int tok
, DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
);
71 EXTERN
void mcMetaError_metaErrorStringT4 (unsigned int tok
, DynamicStrings_String m
, const unsigned char *s1_
, unsigned int _s1_high
, const unsigned char *s2_
, unsigned int _s2_high
, const unsigned char *s3_
, unsigned int _s3_high
, const unsigned char *s4_
, unsigned int _s4_high
);