File modification time: Difference between revisions
Content added Content deleted
(Added FreeBASIC) |
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: POSIX timestamp from Instant 'mtime') |
||
| Line 990: | Line 990: | ||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||
{{ |
{{Works with|rakudo|2016.10}} |
||
<lang perl6>use NativeCall; |
<lang perl6>use NativeCall; |
||
| Line 999: | Line 999: | ||
submethod BUILD(:$atime, :$mtime) { |
submethod BUILD(:$atime, :$mtime) { |
||
$!actime = $atime; |
$!actime = $atime; |
||
$!modtime = $mtime; |
$!modtime = $mtime.to-posix[0].round; |
||
} |
} |
||
} |
} |
||