* gnu/packages/java.scm (classpath-devel)[source]: Add (existing) patch. (jamvm)[source]: Add patches. [arguments]: Inherit non-overridden arguments (particularly #:phases) from jamvm-1-bootstrap. * gnu/packages/patches/jamvm-2.0.0-aarch64-support.patch: New file. * gnu/packages/patches/jamvm-2.0.0-opcode-guard.patch: New file. * gnu/local.mk (dist_patch_DATA): Add files. Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
		
			
				
	
	
		
			35 lines
		
	
	
	
		
			1.4 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
			
		
		
	
	
			35 lines
		
	
	
	
		
			1.4 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
| From ca11b53896365c948426974cb90e8f71c70d123b Mon Sep 17 00:00:00 2001
 | |
| From: Simon South <simon@simonsouth.net>
 | |
| Date: Sun, 31 May 2020 20:36:43 -0400
 | |
| Subject: [PATCH] Guard floating-point opcodes with explicit memory barrier
 | |
| 
 | |
| ---
 | |
|  src/interp/engine/interp-inlining.h | 11 ++++++++++-
 | |
|  1 file changed, 10 insertions(+), 1 deletion(-)
 | |
| 
 | |
| diff --git a/src/interp/engine/interp-inlining.h b/src/interp/engine/interp-inlining.h
 | |
| index 3339b0e..4ee5c5a 100644
 | |
| --- a/src/interp/engine/interp-inlining.h
 | |
| +++ b/src/interp/engine/interp-inlining.h
 | |
| @@ -78,8 +78,17 @@
 | |
|     4.3, we need to insert a label, and ensure its address
 | |
|     is taken (to stop it being optimised out).  However,
 | |
|     this reduces performance on PowerPC by approx 1 - 2%.
 | |
| +
 | |
| +   With gcc 5 and newer an asm statement with a "memory"
 | |
| +   clobber argument explicitly sets a memory barrier for the
 | |
| +   compiler, preventing it from reordering memory accesses
 | |
| +   in a way that breaks decaching.
 | |
|  */
 | |
| -#if (__GNUC__ == 4) && (__GNUC_MINOR__ >= 3)
 | |
| +#if (__GNUC__ > 4)
 | |
| +#define DEF_GUARD_TABLE(level) /* none */
 | |
| +#define GUARD(opcode, level)   __asm__("" ::: "memory");
 | |
| +#define GUARD_TBLS             /* none */
 | |
| +#elif (__GNUC__ == 4) && (__GNUC_MINOR__ >= 3)
 | |
|  #define DEF_GUARD_TABLE(level) DEF_HANDLER_TABLE(level, GUARD)
 | |
|  #define GUARD(opcode, level)   label(opcode, level, GUARD)
 | |
|  #define GUARD_TBLS             , HNDLR_TBLS(GUARD)
 | |
| -- 
 | |
| 2.26.2
 | |
| 
 |