comp.lang.ada
 help / color / mirror / Atom feed
From: dd24fan <d3v3r4@gmail.com>
Subject: Re: .h header file in ObjectAda 8.2.2 source code?
Date: Fri, 19 Jul 2013 08:36:52 -0700 (PDT)
Date: 2013-07-19T08:36:52-07:00	[thread overview]
Message-ID: <b42127a4-c5dc-4fd0-86cd-dd63f014897b@googlegroups.com> (raw)
In-Reply-To: <54f7f0d4-29ef-4de0-94d8-8320e8df24e2@googlegroups.com>

Okay, the header file file contains all necessary information to access type definitions and RTL function prototypes. Below is a snippet of the .h file:

=============
.
.
.
/* Windows Declarations */
#ifdef WIN32
#include <windows.h>
#define _DECL	WINAPI
#define _EXTERN

/* Non Windows Declarations */
#else
#define _DECL
#define _EXTERN

#ifdef _MSC_VER
#define getvect _dos_getvect
#define setvect _dos_setvect
#define disable _disable
#define enable  _enable
#endif

#endif

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

/* RTL is written in 'C' */
#ifdef __cplusplus
extern "C" {
#endif

.
.
.
#define (this section just defines different constants)
.
.
.
/* Include all RTL header files necessary for external compiles */
.
.
.
#include "xyz.h" (this section has 40+ #includes of .h files)
.
.
.
#ifdef __cplusplus
}
#endif

#endif

============

The program runs on a PC Windows environment.  It does not hang in the ada main subprogram execution.

I believe it to hang in the first call to the C code.


  parent reply	other threads:[~2013-07-19 15:36 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-07-19 11:47 .h header file in ObjectAda 8.2.2 source code? dd24fan
2013-07-19 13:02 ` Niklas Holsti
2013-07-19 15:36 ` dd24fan [this message]
2013-07-20  5:41   ` Randy Brukardt
2013-07-22 19:06     ` dd24fan
2013-07-22 19:08     ` dd24fan
2013-07-22 20:04       ` Niklas Holsti
2013-07-23 12:05         ` dd24fan
2013-07-22 19:50     ` dd24fan
2013-07-20  8:07   ` Niklas Holsti
2013-08-01 15:03     ` Stephen Leake
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox