diff --git a/lib/modules/Yabu.pmod/module.pmod b/lib/modules/Yabu.pmod/module.pmod index adbbd4eb6168bcdb074ea2e42fd5e4ec1980ff44..f831484859a9693f392cdf3a873aed79b9bbc4e3 100644 --- a/lib/modules/Yabu.pmod/module.pmod +++ b/lib/modules/Yabu.pmod/module.pmod @@ -4,7 +4,7 @@ * associated with a unique key. */ -constant cvs_id = "$Id: module.pmod,v 1.9 1999/03/03 22:37:46 noring Exp $"; +constant cvs_id = "$Id: module.pmod,v 1.10 1999/06/14 20:10:57 noring Exp $"; #define ERR(msg) throw(({ "(Yabu) "+msg+"\n", backtrace() })) #define WARN(msg) werror(msg) @@ -15,7 +15,7 @@ constant cvs_id = "$Id: module.pmod,v 1.9 1999/03/03 22:37:46 noring Exp $"; #define THREAD_SAFE #define LOCK() do { object key___; catch(key___=lock()) #define UNLOCK() key___=0; } while(0) -#define INHERIT_MUTEX static inherit Thread.Mutex +#define INHERIT_MUTEX static inherit Thread.Mutex; #else #undef THREAD_SAFE #define LOCK() do { @@ -124,7 +124,7 @@ class YabuLog { * */ static private class FileIO { - INHERIT_MUTEX; + INHERIT_MUTEX static private inherit Stdio.File:file; static private void seek(int offset) @@ -181,7 +181,7 @@ static private class FileIO { * */ class Chunk { - INHERIT_MUTEX; + INHERIT_MUTEX static private inherit FileIO:file; static private object parent; @@ -603,7 +603,7 @@ class Transaction { * */ class Table { - INHERIT_MUTEX; + INHERIT_MUTEX static private object index, db, lock_file; static private string mode, filename; @@ -1115,7 +1115,7 @@ class _Table { * */ class db { - INHERIT_MUTEX; + INHERIT_MUTEX static string dir, mode; static mapping tables = ([]), table_refs = ([]); @@ -1269,7 +1269,7 @@ class db { * data records. */ class LookupTable { - INHERIT_MUTEX; + INHERIT_MUTEX static private int minx; static private object table;