Ver Fonte

[cs] don't add space after "return" without a value

Dan Korostelev há 11 anos atrás
pai
commit
b6c0762c17
1 ficheiros alterados com 2 adições e 2 exclusões
  1. 2 2
      gencs.ml

+ 2 - 2
gencs.ml

@@ -1454,8 +1454,8 @@ let configure gen =
 						newline w
 					) ve_l
 				| TReturn eopt ->
-					write w "return ";
-					if is_some eopt then expr_s w (get eopt)
+					write w "return";
+					if is_some eopt then (write w " "; expr_s w (get eopt))
 				| TBreak -> write w "break"
 				| TContinue -> write w "continue"
 				| TThrow e ->