Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

nicer error message of &evalfiles

  • Loading branch information...
commit aee97aacc8f9848ae55abb0090593677d786f4d3 1 parent d44ab2e
Filip Sergot sergot authored
Showing with 5 additions and 2 deletions.
  1. +5 −2 src/HLL/Compiler.pm
7 src/HLL/Compiler.pm
View
@@ -398,10 +398,13 @@ class HLL::Compiler {
pir::push(@codes, $in-handle.readall($_));
$in-handle.close;
CATCH {
- $err := "Error while reading from file: $_";
+ $err := 1;
}
}
- pir::die($err) if $err;
+ if $err {
+ say("Cannot open \"$_\".");
+ pir::exit(1);
+ }
}
my $code := pir::join('', @codes);
my $?FILES := pir::join(' ', @files);
Please sign in to comment.
Something went wrong with that request. Please try again.