Skip to content

Commit d9fe013

Browse files
committed
Improve the comments a bit
1 parent faf97dd commit d9fe013

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

lib/Whateverable/Heartbeat.pm6

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -16,7 +16,7 @@
1616

1717
unit module Whateverable::Heartbeat;
1818

19-
# Tells the watchdog that we're still rolling.
19+
#| Tells the watchdog that we're still rolling.
2020
sub I'm-alive is export {
2121
return if %*ENV<TESTABLE> or %*ENV<DEBUGGABLE>;
2222
use NativeCall;
@@ -25,13 +25,13 @@ sub I'm-alive is export {
2525
sd_notify 0, WATCHDOG=1; # this may be called too often, see TODO below
2626
}
2727

28-
# Asks the test suite to delay the test failure (for 0.5s)
28+
#| Asks the test suite to delay the test failure (for 0.5s)
2929
sub test-delay is export {
3030
use NativeCall;
3131
sub kill(int32, int32) is native {*};
3232
sub getppid(--> int32) is native {*};
3333
my $sig-compat = SIGUSR1;
34-
# ↓ Fragile platform-specific hack
34+
#TODO Fragile platform-specific hack
3535
$sig-compat = 10 if $*PERL.compiler.version ≤ v2018.05;
3636
kill getppid, +$sig-compat; # SIGUSR1
3737
}

0 commit comments

Comments
 (0)