perl: fix computeFSClosure

we must await the promise. also add a Werror argument to not break this again.

Change-Id: Ia02fee1720c0280853bc299d3d20301370d93e56
This commit is contained in:
eldritch horrors
2025-02-24 15:09:02 +00:00
parent 0928d4d87a
commit c6f5a6a196
2 changed files with 8 additions and 1 deletions
+3 -1
View File
@@ -159,7 +159,9 @@ SV * computeFSClosure(int flipDirection, int includeOutputs, ...)
try { try {
StorePathSet paths; StorePathSet paths;
for (int n = 2; n < items; ++n) for (int n = 2; n < items; ++n)
store()->computeFSClosure(store()->parseStorePath(SvPV_nolen(ST(n))), paths, flipDirection, includeOutputs); aio().blockOn(store()->computeFSClosure(
store()->parseStorePath(SvPV_nolen(ST(n))), paths, flipDirection, includeOutputs
));
for (auto & i : paths) for (auto & i : paths)
XPUSHs(sv_2mortal(newSVpv(store()->printStorePath(i).c_str(), 0))); XPUSHs(sv_2mortal(newSVpv(store()->printStorePath(i).c_str(), 0)));
} catch (Error & e) { } catch (Error & e) {
+5
View File
@@ -9,6 +9,11 @@ project('lix-perl', 'cpp',
], ],
) )
add_project_arguments(
'-Werror=unused-result',
language : 'cpp',
)
fs = import('fs') fs = import('fs')
prefix = get_option('prefix') prefix = get_option('prefix')