commit 6f9f0df8486c6737f4485db5b936afac92e4a0f1
parent 580c309488f5470631b515947e8311815ad42920
Author: citbl <citbl@citbl.org>
Date: Thu, 25 Jun 2026 16:24:02 +1000
minor format
Diffstat:
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/src/nightshade.adb b/src/nightshade.adb
@@ -53,9 +53,10 @@ begin
declare
F : File_Type;
QBE_Args : Argument_List :=
- (1 => new String'("-o"), 2 => new String'("tmp/out.s"), 3 => new String'("tmp/main.ssa"));
- CC_Args : Argument_List :=
- (1 => new String'("tmp/out.s"));
+ (1 => new String'("-o"),
+ 2 => new String'("tmp/out.s"),
+ 3 => new String'("tmp/main.ssa"));
+ CC_Args : Argument_List := (1 => new String'("tmp/out.s"));
Status : Integer;
Success : Boolean;
begin
@@ -69,7 +70,7 @@ begin
(Program_Name => "/opt/homebrew/bin/qbe",
Args => QBE_Args,
Output_File => "tmp/qbe.log",
- Success => Success,
+ Success => Success,
Return_Code => Status,
Err_To_Out => True);
@@ -83,7 +84,7 @@ begin
(Program_Name => "/usr/bin/cc",
Args => CC_Args,
Output_File => "tmp/cc.log",
- Success => Success,
+ Success => Success,
Return_Code => Status,
Err_To_Out => True);