Use available terminal columns instead of hardcoded 80 columns

HaxeFoundation · Nov 22, 2023 · 829c518 · 829c518
1 parent 7653f68
commit 829c518
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/haxe.opam b/haxe.opam
@@ -33,4 +33,5 @@ depends: [
   "conf-neko"
   "luv" {>= "0.5.12"}
   "ipaddr"
+  "terminal_size"
 ]
diff --git a/src/compiler/args.ml b/src/compiler/args.ml
@@ -3,7 +3,8 @@ open Common
 open CompilationContext
 
 let limit_string s offset =
-	let rest = 80 - offset in
+	let width = match Terminal_size.get_columns () with None -> 80 | Some c -> c in
+	let rest = width - offset in
 	let words = ExtString.String.nsplit s " " in
 	let rec loop i words = match words with
 		| word :: words ->