classes.struct: Fix prettyprint for PACKED-STRUCT. Fixes #162.
							parent
							
								
									b2176f98a7
								
							
						
					
					
						commit
						e49c3d17b5
					
				| 
						 | 
				
			
			@ -12,7 +12,6 @@ IN: classes.struct.prettyprint
 | 
			
		|||
: struct-definer-word ( class -- word )
 | 
			
		||||
    struct-slots
 | 
			
		||||
    {
 | 
			
		||||
        { [ dup length 1 <= ] [ drop \ STRUCT: ] }
 | 
			
		||||
        { [ dup [ offset>> 0 = ] all? ] [ drop \ UNION-STRUCT: ] }
 | 
			
		||||
        { [ dup [ packed?>> ] all? ] [ drop \ PACKED-STRUCT: ] }
 | 
			
		||||
        [ drop \ STRUCT: ]
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue