From 4163c8fb519c65126922424ac69034ae99633652 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sat, 9 Jul 2011 21:34:32 +0000
Subject: [PATCH]  * assume callback is cdecl

git-svn-id: trunk@17966 -
---
 packages/gdbm/src/gdbm.pp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/packages/gdbm/src/gdbm.pp b/packages/gdbm/src/gdbm.pp
index 12f46ddf04..389463b055 100644
--- a/packages/gdbm/src/gdbm.pp
+++ b/packages/gdbm/src/gdbm.pp
@@ -89,8 +89,7 @@ type
   end;
   PGDBM_FILE = ^TGDBM_FILE;
 
-  TGDBMErrorCallBack = Procedure;
-
+  TGDBMErrorCallBack = Procedure; cdecl;
 
 
 var