Alien-LibJIT

 view release on metacpan or  search on metacpan

libjit/attic/README.alpha  view on Meta::CPAN

of information to be very useful:

	Alpha Architecture Handbook
	ftp://ftp.compaq.com/pub/products/alphaCPUdocs/alpha_arch_ref.pdf
	http://ftp.digital.com/pub/Digital/info/semiconductor/literature/alphaahb.pdf

	Compiler Writer's Guide for the 21264/21364
	ftp://ftp.compaq.com/pub/products/alphaCPUdocs/comp_guide_v2.pdf

	Assembly Language Programmer's Guide
	http://www.cs.arizona.edu/computer.help/policy/DIGITAL_unix/AA-PS31D-TET1_html/TITLE.html

	binutils source code
	binutils-2.16.1/opcodes/alpha-opc.c

	ffcall source code
	ffcall-1.10/avcall/avcall-alpha.c

	mono source code
	mono-.1.1.15/mono/arch/alpha/*

libjit/jit/jit-alloc.c  view on Meta::CPAN

#ifdef HAVE_FCNTL_H
	#include <fcntl.h>
#endif
#else /* JIT_WIN32_PLATFORM */
	#include <windows.h>
	#include <io.h>
#endif
#if defined(HAVE_SYS_MMAN_H) && defined(HAVE_MMAP) && defined(HAVE_MUNMAP)
/*
 * Make sure that "MAP_ANONYMOUS" is correctly defined, because it
 * may not exist on some variants of Unix.
 */
#ifndef MAP_ANONYMOUS
    #ifdef MAP_ANON
        #define MAP_ANONYMOUS        MAP_ANON
    #endif
#endif
#ifdef MAP_ANONYMOUS
#define JIT_USE_MMAP
#endif
#endif

libjit/jit/jit-vmem.c  view on Meta::CPAN

#  define getpagesize() (NBPG)
# elif defined(PAGE_SIZE)
#  define getpagesize() (PAGE_SIZE)
# else
#  define getpagesize() (4096)
# endif
#endif

/*
 * Make sure that "MAP_ANONYMOUS" is correctly defined, because it
 * may not exist on some variants of Unix.
 */
#if !defined(MAP_ANONYMOUS) && defined(MAP_ANON)
# define MAP_ANONYMOUS        MAP_ANON
#endif

static jit_uint page_size;

#if defined(JIT_VMEM_WIN32)
static DWORD
convert_prot(jit_prot_t prot)

libjit/jit/jit-vmem.c  view on Meta::CPAN

void
jit_vmem_init(void)
{
#if defined(JIT_VMEM_WIN32)
	/* Get the page size from a Windows-specific API */
	SYSTEM_INFO sysInfo;
	GetSystemInfo(&sysInfo);
	page_size = (jit_uint) (sysInfo.dwPageSize);
#else
	/* Get the page size using a Unix-like sequence */
	page_size = (jit_uint) getpagesize();
#endif
}

/*@
 * @deftypefun {unsigned int} jit_vmem_page_size (void)
 * Get the page allocation size for the system.  This is the preferred
 * unit when making calls to @code{_jit_malloc_exec}.  It is not
 * required that you supply a multiple of this size when allocating,
 * but it can lead to better performance on some systems.