diff --git a/build.bat b/build.bat index 56decbb..dfc466e 100644 --- a/build.bat +++ b/build.bat @@ -1 +1 @@ -dmd main.d stats.d imports.d highlighter.d ctags.d astprinter.d formatter.d outliner.d std/allocator.d std/lexer.d std/d/ast.d std/d/parser.d std/d/lexer.d analysis/base.d analysis/del.d analysis/enumarrayliteral.d analysis/constructors.d analysis/ifelsesame.d analysis/fish.d analysis/numbers.d analysis/objectconst.d analysis/package.d analysis/pokemon.d analysis/range.d analysis/run.d analysis/style.d -ofdscanner.exe -version=DIP61 -O -release -noboundscheck -inline +dmd main.d stats.d imports.d highlighter.d ctags.d astprinter.d formatter.d outliner.d std/allocator.d std/lexer.d std/d/ast.d std/d/parser.d std/d/lexer.d analysis/base.d analysis/del.d analysis/enumarrayliteral.d analysis/constructors.d analysis/ifelsesame.d analysis/fish.d analysis/numbers.d analysis/objectconst.d analysis/package.d analysis/pokemon.d analysis/range.d analysis/run.d analysis/style.d -ofdscanner.exe -version=DIP61 -O -release -inline diff --git a/std/allocator.d b/std/allocator.d index f9c5796..db8a0f0 100644 --- a/std/allocator.d +++ b/std/allocator.d @@ -836,143 +836,6 @@ unittest test!Mallocator(); } -version (Posix) extern(C) int posix_memalign(void**, size_t, size_t); -version (Windows) -{ - extern(C) void* _aligned_malloc(size_t, size_t); - extern(C) void _aligned_free(void *memblock); - extern(C) void* _aligned_realloc(void *, size_t, size_t); -} - -/** - Aligned allocator using OS-specific primitives, under a uniform API. - */ -struct AlignedMallocator -{ - private import core.stdc.stdlib; - - /** - The default alignment is $(D platformAlignment). - */ - enum uint alignment = platformAlignment; - - /** - Forwards to $(D alignedAllocate(bytes, platformAlignment)). - */ - @trusted void[] allocate(size_t bytes) shared - { - return alignedAllocate(bytes, alignment); - } - - version (Posix) import core.stdc.errno, core.sys.posix.stdlib; - - /** - Uses $(WEB man7.org/linux/man-pages/man3/posix_memalign.3.html, - $(D posix_memalign)) on Posix and - $(WEB msdn.microsoft.com/en-us/library/8z34s9c6(v=vs.80).aspx, - $(D __aligned_malloc)) on Windows. - */ - version(Posix) @trusted - void[] alignedAllocate(size_t bytes, uint a) shared - { - assert(a.isGoodDynamicAlignment); - void* result; - auto code = posix_memalign(&result, a, bytes); - if (code == ENOMEM) return null; - enforce(code == 0, text("Invalid alignment requested: ", a)); - return result[0 .. bytes]; - } - else version(Windows) @trusted - void[] alignedAllocate(size_t bytes, uint a) shared - { - auto result = _aligned_malloc(bytes, a); - return result ? result[0 .. bytes] : null; - } - else static assert(0); - - /** - Calls $(D free(b.ptr)) on Posix and - $(WEB msdn.microsoft.com/en-US/library/17b5h8td(v=vs.80).aspx, - $(D __aligned_free(b.ptr))) on Windows. - */ - version (Posix) @system - void deallocate(void[] b) shared - { - free(b.ptr); - } - else version (Windows) @system - void deallocate(void[] b) shared - { - _aligned_free(b.ptr); - } - else static assert(0); - - /** - On Posix, forwards to $(D realloc). On Windows, forwards to - $(D alignedReallocate(b, newSize, platformAlignment)). - */ - version (Posix) @system bool reallocate(ref void[] b, size_t newSize) shared - { - return Mallocator.it.reallocate(b, newSize); - } - version (Windows) @system - bool reallocate(ref void[] b, size_t newSize) shared - { - return alignedReallocate(b, newSize, alignment); - } - - /** - On Posix, uses $(D alignedAllocate) and copies data around because there is - no realloc for aligned memory. On Windows, calls - $(WEB msdn.microsoft.com/en-US/library/y69db7sx(v=vs.80).aspx, - $(D __aligned_realloc(b.ptr, newSize, a))). - */ - version (Posix) @system - bool alignedReallocate(ref void[] b, size_t s, uint a) shared - { - if (!s) - { - deallocate(b); - b = null; - return true; - } - auto result = alignedAllocate(s, a); - if (!result) return false; - if (s < b.length) result[] = b[0 .. s]; - else result[0 .. b.length] = b[]; - deallocate(b); - b = result; - return true; - } - else version (Windows) @system - bool alignedReallocate(ref void[] b, size_t s, uint a) shared - { - if (!s) - { - deallocate(b); - b = null; - return true; - } - auto p = cast(ubyte*) _aligned_realloc(b.ptr, s, a); - if (!p) return false; - b = p[0 .. s]; - return true; - } - - /** - Returns the global instance of this allocator type. The C heap allocator is thread-safe, therefore all of its methods and $(D it) itself are $(D shared). - */ - static shared AlignedMallocator it; -} - -/// -unittest -{ - auto buffer = AlignedMallocator.it.alignedAllocate(1024 * 1024 * 4, 128); - scope(exit) AlignedMallocator.it.deallocate(buffer); - //... -} - /** Returns s rounded up to a multiple of base. */