Skip to content

Commit

Permalink
Close unit's file handle after reading in the bytecode
Browse files Browse the repository at this point in the history
A file is left open on Windows, so it prevents it from being worked on.

Fixes RT#131378: https://rt.perl.org/Ticket/Display.html?id=131378
  • Loading branch information
zoffixznet committed May 28, 2017
1 parent f539a62 commit 85710a7
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/core/CompUnit/PrecompilationRepository.pm
Original file line number Diff line number Diff line change
Expand Up @@ -69,6 +69,7 @@ class CompUnit::PrecompilationRepository::Default does CompUnit::PrecompilationR
if $*RAKUDO_MODULE_DEBUG -> $RMD { $RMD("Loading precompiled\n$unit") }
#?if moar
my $handle := CompUnit::Loader.load-precompilation-file($unit.bytecode-handle);
$unit.close;
#?endif
#?if !moar
my $handle := CompUnit::Loader.load-precompilation($unit.bytecode);
Expand Down

0 comments on commit 85710a7

Please sign in to comment.