Actually compile using the correct language (-x option).

diff --git a/klcc.in b/klcc.in
index bec1761..9820391 100644
--- a/klcc.in
+++ b/klcc.in
@@ -171,7 +171,7 @@
 	    push(@objs, $fo);
 	    push(@rmobjs, $fo) unless ( $save_temps );
 
-	    $rv = mysystem($CC, @ccopt, '-c', '-o', $fo, $f);
+	    $rv = mysystem($CC, @ccopt, '-c', '-o', $fo, '-x', $flang{$f}, $f);
 
 	    if ( $rv ) {
 		unlink(@rmobjs);