source: libcfa/src/bits/debug.hfa @ 75ca7f4

ADTarm-ehast-experimentalenumforall-pointer-decayjacob/cs343-translationnew-astnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since 75ca7f4 was c84b4be, checked in by Thierry Delisle <tdelisle@…>, 5 years ago

new ready queue seems to work but halting does not, had to be disabled

  • Property mode set to 100644
File size: 3.1 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// debug.hfa --
8//
9// Author           : Thierry Delisle
10// Created On       : Mon Nov 28 12:27:26 2016
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Thu Nov 21 17:06:58 2019
13// Update Count     : 8
14//
15
16#pragma once
17
18#ifdef __CFA_DEBUG__
19        #define __cfaabi_dbg_debug_do(...) __VA_ARGS__
20        #define __cfaabi_dbg_no_debug_do(...)
21        #define __cfaabi_dbg_ctx __PRETTY_FUNCTION__
22        #define __cfaabi_dbg_ctx2 , __PRETTY_FUNCTION__
23        #define __cfaabi_dbg_ctx_param const char * caller
24        #define __cfaabi_dbg_ctx_param2 , const char * caller
25#else
26        #define __cfaabi_dbg_debug_do(...)
27        #define __cfaabi_dbg_no_debug_do(...) __VA_ARGS__
28        #define __cfaabi_dbg_ctx
29        #define __cfaabi_dbg_ctx2
30        #define __cfaabi_dbg_ctx_param
31        #define __cfaabi_dbg_ctx_param2
32#endif
33
34#ifdef __cforall
35extern "C" {
36#endif
37        #include <stdarg.h>
38        #include <stdio.h>
39        #include <unistd.h>
40
41        extern void __cfaabi_bits_write( int fd, const char *buffer, int len );
42        extern void __cfaabi_bits_acquire();
43        extern void __cfaabi_bits_release();
44        extern void __cfaabi_bits_print_safe  ( int fd, const char fmt[], ... ) __attribute__(( format(printf, 2, 3) ));
45        extern void __cfaabi_bits_print_nolock( int fd, const char fmt[], ... ) __attribute__(( format(printf, 2, 3) ));
46        extern void __cfaabi_bits_print_vararg( int fd, const char fmt[], va_list arg );
47        extern void __cfaabi_bits_print_buffer( int fd, char buffer[], int buffer_size, const char fmt[], ... ) __attribute__(( format(printf, 4, 5) ));
48#ifdef __cforall
49}
50#endif
51
52// #define __CFA_DEBUG_PRINT__
53
54#ifdef __CFA_DEBUG_PRINT__
55        #define __cfaabi_dbg_write( buffer, len )         __cfaabi_bits_write( STDERR_FILENO, buffer, len )
56        #define __cfaabi_dbg_acquire()                    __cfaabi_bits_acquire()
57        #define __cfaabi_dbg_release()                    __cfaabi_bits_release()
58        #define __cfaabi_dbg_print_safe(...)              __cfaabi_bits_print_safe  ( STDERR_FILENO, __VA_ARGS__ )
59        #define __cfaabi_dbg_print_nolock(...)            __cfaabi_bits_print_nolock( STDERR_FILENO, __VA_ARGS__ )
60        #define __cfaabi_dbg_print_buffer(...)            __cfaabi_bits_print_buffer( STDERR_FILENO, __VA_ARGS__ )
61        #define __cfaabi_dbg_print_buffer_decl(...)       char __dbg_text[256]; int __dbg_len = snprintf( __dbg_text, 256, __VA_ARGS__ ); __cfaabi_bits_write( STDERR_FILENO, __dbg_text, __dbg_len );
62        #define __cfaabi_dbg_print_buffer_local(...)      __dbg_len = snprintf( __dbg_text, 256, __VA_ARGS__ ); __cfaabi_bits_write( STDERR_FILENO, __dbg_text, __dbg_len );
63#else
64        #define __cfaabi_dbg_write(...)               ((void)0)
65        #define __cfaabi_dbg_acquire()                ((void)0)
66        #define __cfaabi_dbg_release()                ((void)0)
67        #define __cfaabi_dbg_print_safe(...)          ((void)0)
68        #define __cfaabi_dbg_print_nolock(...)        ((void)0)
69        #define __cfaabi_dbg_print_buffer(...)        ((void)0)
70        #define __cfaabi_dbg_print_buffer_decl(...)   ((void)0)
71        #define __cfaabi_dbg_print_buffer_local(...)  ((void)0)
72#endif
73
74// Local Variables: //
75// mode: c //
76// tab-width: 4 //
77// End: //
Note: See TracBrowser for help on using the repository browser.