FLOAT did not work
This commit is contained in:
		
							parent
							
								
									6fdd5b6a6d
								
							
						
					
					
						commit
						99f8e49e93
					
				
					 1 changed files with 1 additions and 1 deletions
				
			
		| 
						 | 
				
			
			@ -63,7 +63,7 @@ MkCoercion(pnd, tp)
 | 
			
		|||
	if (nd_tp->tp_fund == T_STRING) return;
 | 
			
		||||
	nd_tp = BaseType(nd_tp);
 | 
			
		||||
	if (nd->nd_class == Value &&
 | 
			
		||||
	    (nd_tp->tp_fund != T_REAL && tp->tp_fund != REAL)) {
 | 
			
		||||
	    (nd_tp->tp_fund != T_REAL && tp->tp_fund != T_REAL)) {
 | 
			
		||||
		switch(tp->tp_fund) {
 | 
			
		||||
		case T_SUBRANGE:
 | 
			
		||||
			if (! chk_bounds(tp->sub_lb, nd->nd_INT, 
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		
		Reference in a new issue