diff --git a/src/transcc/builder.monkey b/src/transcc/builder.monkey
index 12af10fb..016d4a20 100644
--- a/src/transcc/builder.monkey
+++ b/src/transcc/builder.monkey
@@ -52,7 +52,10 @@ Class Builder
 
 		Print "Parsing..."
 		
-		SetConfigVar "HOST",ENV_HOST
+		Local host:String=tcc.opt_host
+		If host.Length<=0 host = ENV_HOST
+		
+		SetConfigVar "HOST",host
 		SetConfigVar "LANG",ENV_LANG
 		SetConfigVar "TARGET",ENV_TARGET
 		SetConfigVar "CONFIG",ENV_CONFIG
diff --git a/src/transcc/transcc.monkey b/src/transcc/transcc.monkey
index b4a3f865..22333d3f 100644
--- a/src/transcc/transcc.monkey
+++ b/src/transcc/transcc.monkey
@@ -146,6 +146,7 @@ Class TransCC
 	Field opt_target:String
 	Field opt_modpath:String
 	Field opt_builddir:String
+	Field opt_host:String
 	
 	'config file
 	Field ANDROID_PATH:String
@@ -296,6 +297,8 @@ Class TransCC
 					opt_modpath=rhs
 				Case "-builddir"
 					opt_builddir=rhs
+				Case "-host"
+					opt_host = rhs.ToLower()
 				Default
 					Die "Unrecognized command line option: "+arg
 				End