mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-10-31 09:11:53 +01:00 
			
		
		
		
	Avoid trying to use invalid instruction exception if Test8087 is below 2, as older CPU ignore simply invalid instructions
git-svn-id: trunk@36298 -
This commit is contained in:
		
							parent
							
								
									0f80603dae
								
							
						
					
					
						commit
						e092f00843
					
				| @ -167,6 +167,8 @@ Procedure SysInitFPU; | ||||
|       fldcw   localfpucw | ||||
|       fwait | ||||
|     end; | ||||
|     if Test8087 < 2 then | ||||
|       exit; | ||||
|     asm | ||||
|       push es | ||||
|       push ds | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user
	 pierre
						pierre