rpl.rb/lib/rpl/words/time-date.rb
2022-02-26 18:53:39 +01:00

36 lines
1.2 KiB
Ruby

# frozen_string_literal: true
require 'date'
module RplLang
module Words
module TimeAndDate
include Types
def populate_dictionary
super
@dictionary.add_word( ['time'],
'Time and date',
'( -- t ) push current time',
proc do
@stack << RplString.new( "\"#{Time.now}\"" )
end )
@dictionary.add_word( ['date'],
'Time and date',
'( -- d ) push current date',
proc do
@stack << RplString.new( "\"#{Date.today}\"" )
end )
@dictionary.add_word( ['ticks'],
'Time and date',
'( -- t ) push datetime as ticks',
proc do
ticks_since_epoch = Time.utc( 1, 1, 1 ).to_i * 10_000_000
now = Time.now
@stack << RplNumeric.new( now.to_i * 10_000_000 + now.nsec / 100 - ticks_since_epoch )
end )
end
end
end
end