Branch: Tag:

1998-01-30

1998-01-30 06:21:37 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

file->proxy(), memory leak fixes, more debug etc. etc.

Rev: src/array.c:1.24
Rev: src/builtin_functions.c:1.65
Rev: src/error.c:1.11
Rev: src/modules/Oracle/oracle.c:1.7
Rev: src/modules/files/file.c:1.72
Rev: src/modules/system/system.c:1.40
Rev: src/signal_handler.c:1.27
Rev: src/threads.c:1.55
Rev: src/threads.h:1.28

70:   #else   #define th_yield()   #endif /* HAVE_PTHREAD_YIELD */ + extern pthread_attr_t pattr; + extern pthread_attr_t small_pattr;      #define th_create(ID,fun,arg) pthread_create(ID,&pattr,fun,arg) -  + #define th_create_small(ID,fun,arg) pthread_create(ID,&small_pattr,fun,arg)   #define th_exit(foo) pthread_exit(foo)   #define th_self() pthread_self()   
110:   #define th_setconcurrency(X) thr_setconcurrency(X)      #define th_create(ID,fun,arg) thr_create(NULL,0,fun,arg,THR_DAEMON,ID) + #define th_create_small(ID,fun,arg) thr_create(NULL,32768,fun,arg,THR_DAEMON,ID)   #define th_exit(foo) thr_exit(foo)   #define th_self() thr_self()   #define th_yield() thr_yield()
141:      #define PIKE_SPROC_FLAGS (PR_SADDR|PR_SFDS|PR_SDIR|PS_SETEXITSIG)   #define th_create(ID, fun, arg) (((*(ID)) = sproc(fun, PIKE_SPROC_FLAGS, arg)) == -1) + #define th_create_small(ID, fun, arg) (((*(ID)) = sproc(fun, PIKE_SPROC_FLAGS, arg)) == -1)   #define th_exit(X) exit(X)   #define th_self() getpid()   #define th_yield() sginap(0)
159:   #define THREAD_T HANDLE   #define th_setconcurrency(X)   #define th_create(ID,fun,arg) (!(*(ID)=_beginthread(fun, 2*1024*1024, arg))) + #define th_create_small(ID,fun,arg) (!(*(ID)=_beginthread(fun, 32768, arg)))   #define th_exit(foo) _endthread(foo)   #define th_self() GetCurrentThread()   #define th_destroy(X)