fixed constant dimension size bug
--HG-- extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%40158
This commit is contained in:
		
							parent
							
								
									0bdf321d67
								
							
						
					
					
						commit
						1dc2662a62
					
				@ -2027,7 +2027,7 @@ static int declloc(int fstatic)
 | 
			
		||||
      if (all_constant) {
 | 
			
		||||
        /* Change the last dimension to be based on chars instead if we have a string */
 | 
			
		||||
        if (tag == pc_tag_string && dim[numdim-1])
 | 
			
		||||
          dim[numdim-1] = (size + sizeof(cell)-1) / sizeof(cell);
 | 
			
		||||
          dim[numdim-1] = (dim[numdim-1] + sizeof(cell)-1) / sizeof(cell);
 | 
			
		||||
        /* Scrap the code generated */
 | 
			
		||||
        ident = iARRAY;
 | 
			
		||||
        stgdel(_index, _code);
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user