Mercurial > projects > ldc
view lphobos/internal/critical.d @ 1418:f5f8c21ce6ef
Make "`aa[key]`" use the same runtime call as "`key in aa`". The runtime calls
these were using were different, but with equivalent definitions.
With `ldc -O3`, the following functions now all compile to the exact same code:
{{{
int[int] y;
void foo(int x) {
if (x in y) {
auto z = x in y;
sink(*z);
}
}
void bar(int x) {
if (x in y) {
sink(y[x]);
}
}
void baz(int x) {
if (auto p = x in y) {
sink(*p);
}
}
}}}
author | Frits van Bommel <fvbommel wxs.nl> |
---|---|
date | Mon, 25 May 2009 12:50:40 +0200 |
parents | 373489eeaf90 |
children |
line wrap: on
line source
module internal.critical; extern(C): import std.c.linux.linux, std.c.stdlib:ccalloc=calloc, cmalloc=malloc, cfree=free; struct CritSec { pthread_mutex_t* p; } const PTHREAD_MUTEX_RECURSIVE = 1, PTHREAD_MUTEX_ERRORCHECK=2; extern(C) int pthread_self(); void _d_criticalenter(CritSec* cs) { if (!cs.p) { auto newp = cast(pthread_mutex_t*) cmalloc(pthread_mutex_t.sizeof); auto cspp = &cs.p; pthread_mutexattr_t mt; pthread_mutexattr_init(&mt); pthread_mutexattr_settype(&mt, PTHREAD_MUTEX_RECURSIVE); printf("Create -> %i\n", pthread_mutex_init(newp, &mt)); asm { xor EAX, EAX; mov ECX, newp; mov EDX, cspp; lock; cmpxchg int ptr [EDX], ECX; } if (cs.p != newp) pthread_mutex_destroy(newp); } auto count = (cast(uint*) cs.p)[1]; // printf("%i ::%u\n", pthread_self(), count); //printf("%i: Lock %p -> %i\n", pthread_self(), cs.p, pthread_mutex_lock(cs.p);//); } void _d_criticalexit(CritSec* cs) { //printf("%i: Unlock %p -> %i\n", pthread_self(), cs.p, pthread_mutex_unlock(cs.p);//); } void _d_monitorenter(Object h) { _d_criticalenter(cast(CritSec*) &h.__monitor); } void _d_monitorexit(Object h) { _d_criticalexit(cast(CritSec*) &h.__monitor); } void _STI_monitor_staticctor() { } void _STI_critical_init() { } void _STI_critical_term() { } void _STD_monitor_staticdtor() { } void _STD_critical_term() { }