From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM autolearn=unavailable autolearn_force=no version=3.4.4 X-Received: by 2002:a24:4502:: with SMTP id y2-v6mr533649ita.0.1533342025774; Fri, 03 Aug 2018 17:20:25 -0700 (PDT) X-Received: by 2002:aca:c744:: with SMTP id x65-v6mr249417oif.2.1533342025658; Fri, 03 Aug 2018 17:20:25 -0700 (PDT) Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!news.gegeweb.eu!gegeweb.org!news.redatomik.org!newsfeed.xs4all.nl!newsfeed7.news.xs4all.nl!85.12.16.69.MISMATCH!peer02.ams1!peer.ams1.xlned.com!news.xlned.com!peer02.am4!peer.am4.highwinds-media.com!peer02.iad!feed-me.highwinds-media.com!news.highwinds-media.com!g24-v6no2378568iti.0!news-out.google.com!l67-v6ni2028itl.0!nntp.google.com!g24-v6no2378565iti.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: comp.lang.ada Date: Fri, 3 Aug 2018 17:20:25 -0700 (PDT) Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=101.164.108.182; posting-account=wavAeAoAAAAZF_sXSZepBukuPCBO0Zqt NNTP-Posting-Host: 101.164.108.182 User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: <27b53953-36f2-4efe-b877-2e316b176d80@googlegroups.com> Subject: Ann: Ada-Win32 bindings From: alby.gamper@gmail.com Injection-Date: Sat, 04 Aug 2018 00:20:25 +0000 Content-Type: text/plain; charset="UTF-8" X-Received-Bytes: 2130 X-Received-Body-CRC: 1119925992 Xref: reader02.eternal-september.org comp.lang.ada:54034 Date: 2018-08-03T17:20:25-07:00 List-Id: Dear Ada community I am pleased to announce the initial release of ADA bindings for the Win32 API Available at https://github.com/Alex-Gamper/Ada-Win32 These bindings where generated from the latest Windows SDK (version 17134) on Windows 10 x64 and include the definitions that would be available from the following C/C++ header file #include #if (_MSC_VER >= 1900) #ifdef _WIN64 #if _WIN32_WINNT >= _WIN32_WINNT_WINBLUE #include #include #include #include #include #endif #endif #endif It is intended that these binding for the basis of both the Ada-WinRT and the planned/future Ada-NetFramework bindings Note: Their is still a bit of work to do in these bindings, specifically 1) Callbacks / function profiles need to be addressed (currently mapped to System.Address) 2) Handle inline functions ?? 3) Better handling of Pre-processor macros ??