Keith Marshall
keith****@users*****
Thu Jun 28 01:51:31 JST 2018
ForkOn 27/06/18 01:06, David Gressett wrote:
> Here is the first one: adaint.c, 26 lines of text:
>
> #ifdef __cplusplus
> extern "C" {
> #endif
>
> #include "mingw32.h"
>
> #include "adaint.h"
>
> #define GNAT_MAX_PATH_LEN 256
>
> OS_Time
> __gnat_file_time_name_attr (char* name, struct file_attributes* attr)
> {
> if (attr->timestamp == (OS_Time)-2) {
> BOOL res;
> WIN32_FILE_ATTRIBUTE_DATA fad;
> GNAT_TIME_T ret = -1;
> TCHAR wname[GNAT_MAX_PATH_LEN];
> S2WSC (wname, name, GNAT_MAX_PATH_LEN);
>
> if ((res = GetFileAttributesEx (wname, GetFileExInfoStandard, &fad)))
> /* f2t (&fad.ftLastWriteTime, &ret) */;
> attr->timestamp = (OS_Time) ret;
> }
> return attr->timestamp;
> }
BTW, aside from the more critical error (already noted), this is also
wrong if you compile as C++ ... you are missing
#ifdef __cplusplus
}
#endif
at the end of the file.
--
Regards,
Keith.
Public key available from keys.gnupg.net
Key fingerprint: C19E C018 1547 DE50 E1D4 8F53 C0AD 36C6 347E 5A3F
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 836 bytes
Desc: OpenPGP digital signature
Url : https://lists.osdn.me/mailman/archives/mingw-users/attachments/20180627/5961f0a3/attachment-0001.pgp