Officially drop PowerPC port
							parent
							
								
									fe96ce3d61
								
							
						
					
					
						commit
						d2dd184d58
					
				| 
						 | 
					@ -15,12 +15,7 @@ generalizations ;
 | 
				
			||||||
IN: bootstrap.image
 | 
					IN: bootstrap.image
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: arch ( os cpu -- arch )
 | 
					: arch ( os cpu -- arch )
 | 
				
			||||||
    [ dup "winnt" = "winnt" "unix" ? ] dip
 | 
					    [ "winnt" = "winnt" "unix" ? ] dip "-" glue ;
 | 
				
			||||||
    {
 | 
					 | 
				
			||||||
        { "ppc" [ drop "-ppc" append ] }
 | 
					 | 
				
			||||||
        { "x86.32" [ nip "-x86.32" append ] }
 | 
					 | 
				
			||||||
        { "x86.64" [ nip "-x86.64" append ] }
 | 
					 | 
				
			||||||
    } case ;
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
: my-arch ( -- arch )
 | 
					: my-arch ( -- arch )
 | 
				
			||||||
    os name>> cpu name>> arch ;
 | 
					    os name>> cpu name>> arch ;
 | 
				
			||||||
| 
						 | 
					@ -35,7 +30,6 @@ IN: bootstrap.image
 | 
				
			||||||
    {
 | 
					    {
 | 
				
			||||||
        "winnt-x86.32" "unix-x86.32"
 | 
					        "winnt-x86.32" "unix-x86.32"
 | 
				
			||||||
        "winnt-x86.64" "unix-x86.64"
 | 
					        "winnt-x86.64" "unix-x86.64"
 | 
				
			||||||
        "linux-ppc" "macosx-ppc"
 | 
					 | 
				
			||||||
    } ;
 | 
					    } ;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
<PRIVATE
 | 
					<PRIVATE
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -22,9 +22,6 @@ architecture get {
 | 
				
			||||||
    { "unix-x86.32" "x86/32/unix" }
 | 
					    { "unix-x86.32" "x86/32/unix" }
 | 
				
			||||||
    { "winnt-x86.64" "x86/64/winnt" }
 | 
					    { "winnt-x86.64" "x86/64/winnt" }
 | 
				
			||||||
    { "unix-x86.64" "x86/64/unix" }
 | 
					    { "unix-x86.64" "x86/64/unix" }
 | 
				
			||||||
    { "linux-ppc" "ppc/linux" }
 | 
					 | 
				
			||||||
    { "macosx-ppc" "ppc/macosx" }
 | 
					 | 
				
			||||||
    { "arm" "arm" }
 | 
					 | 
				
			||||||
} ?at [ "Bad architecture: " prepend throw ] unless
 | 
					} ?at [ "Bad architecture: " prepend throw ] unless
 | 
				
			||||||
"vocab:cpu/" "/bootstrap.factor" surround parse-file
 | 
					"vocab:cpu/" "/bootstrap.factor" surround parse-file
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -26,7 +26,6 @@ CONSTANT: cpus
 | 
				
			||||||
{
 | 
					{
 | 
				
			||||||
    { "x86.32" "x86" }
 | 
					    { "x86.32" "x86" }
 | 
				
			||||||
    { "x86.64" "x86-64" }
 | 
					    { "x86.64" "x86-64" }
 | 
				
			||||||
    { "ppc" "PowerPC" }
 | 
					 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: render-grid-header ( -- xml )
 | 
					: render-grid-header ( -- xml )
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue