preparations for making 'closure' the default calling convention for proc types

3 files changed, 4 insertions, 4 deletions

diff --git a/lib/wrappers/gtk/atk.nim b/lib/wrappers/gtk/atk.nim
index 3ae687aed..f59d95f87 100755
--- a/lib/wrappers/gtk/atk.nim
+++ b/lib/wrappers/gtk/atk.nim
@@ -419,7 +419,7 @@ type
     pad32*: TFunction
 
   TEventListener* = proc (para1: PObject){.cdecl.}
-  TEventListenerInitProc* = proc ()
+  TEventListenerInitProc* = proc (){.cdecl.}
   TEventListenerInit* = proc (para1: TEventListenerInitProc){.cdecl.}
   PKeyEventStruct* = ptr TKeyEventStruct
   TKeyEventStruct*{.final, pure.} = object 
diff --git a/lib/wrappers/gtk/gdk2.nim b/lib/wrappers/gtk/gdk2.nim
index 67ee5b15c..d84f7ccc3 100755
--- a/lib/wrappers/gtk/gdk2.nim
+++ b/lib/wrappers/gtk/gdk2.nim
@@ -291,7 +291,7 @@ type
   PEvent* = ptr TEvent
   TEventFunc* = proc (event: PEvent, data: gpointer){.cdecl.}
   PXEvent* = ptr TXEvent
-  TXEvent* = proc ()
+  TXEvent* = proc () {.cdecl.}
   PFilterReturn* = ptr TFilterReturn
   TFilterReturn* = enum 
     FILTER_CONTINUE, FILTER_TRANSLATE, FILTER_REMOVE
@@ -775,7 +775,7 @@ type
   PWindowObjectClass* = ptr TWindowObjectClass
   TWindowObjectClass* = object of TDrawableClass
   window_invalidate_maybe_recurse_child_func* = proc (para1: PWindow, 
-      para2: gpointer): gboolean
+      para2: gpointer): gboolean {.cdecl.}
 
 proc TYPE_COLORMAP*(): GType
 proc COLORMAP*(anObject: pointer): PColormap
diff --git a/lib/wrappers/gtk/glib2.nim b/lib/wrappers/gtk/glib2.nim
index 57d561432..4d3d32b29 100755
--- a/lib/wrappers/gtk/glib2.nim
+++ b/lib/wrappers/gtk/glib2.nim
@@ -2676,7 +2676,7 @@ when false:
   proc g_critical*(format: cstring){.varargs.}
   proc g_warning*(format: cstring){.varargs.}
 type 
-  TGPrintFunc* = proc (str: cstring)
+  TGPrintFunc* = proc (str: cstring){.cdecl, varargs.}
 
 proc g_set_print_handler*(func: TGPrintFunc): TGPrintFunc{.cdecl, 
     dynlib: gliblib, importc: "g_set_print_handler".}