From c043b1d9492af55879392c915f1ceb32b3d05127 Mon Sep 17 00:00:00 2001
From: bakpakin <calsrose@gmail.com>
Date: Sun, 14 Aug 2022 15:40:09 -0500
Subject: [PATCH] Add win32 ffi example.

---
 CHANGELOG.md             | 1 +
 examples/ffi/win32.janet | 7 +++++++
 2 files changed, 8 insertions(+)
 create mode 100644 examples/ffi/win32.janet

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 8f021aca..d40fd113 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,7 @@
 All notable changes to this project will be documented in this file.
 
 ## 1.23.1 - ???
+- Add FFI support to 64-bit windows compiled with MSVC
 - Don't process shared object names passed to dlopen.
 - Add better support for windows console in the default shell.c for autocompletion and
   other shell-like input features.
diff --git a/examples/ffi/win32.janet b/examples/ffi/win32.janet
new file mode 100644
index 00000000..355fb173
--- /dev/null
+++ b/examples/ffi/win32.janet
@@ -0,0 +1,7 @@
+(ffi/context "user32.dll")
+
+(ffi/defbind MessageBoxA :int
+  [w :ptr text :string cap :string typ :int])
+
+(MessageBoxA nil "Hello, World!" "Test" 0)
+