paulirwin_lillisp/Lillisp.Tests/TimeTests.cs
using Lillisp.Core;

namespace Lillisp.Tests;

public class TimeTests
{
    [Fact]
    public void CurrentJiffy_BasicTest()
    {
        var runtime = new LillispRuntime();

        var result = runtime.EvaluateProgram("(current-jiffy)");

        Assert.IsType<long>(result);
        Assert.NotEqual(0L, result);
    }

    [Fact]
    public void JiffiesPerSecond_BasicTest()
    {
        var runtime = new LillispRuntime();

        var result = runtime.EvaluateProgram("(jiffies-per-second)");

        Assert.IsType<long>(result);
        Assert.Equal(10_000_000L, result);
    }

    [Fact]
    public void CurrentSecond_BasicTest()
    {
        var runtime = new LillispRuntime();

        var result = runtime.EvaluateProgram("(current-second)");

        Assert.IsType<long>(result);
        Assert.NotEqual(0L, result);
    }
}