about summary refs log tree commit diff
path: root/pkgs/applications/emulators/craftos-pc/test-eval-periphemu/init.lua
blob: 1d6ec8b6d8425d9939ba6b3d1381f483af5698d6 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
local function assert(cond1, cond2)
    if not cond1 == cond2 then print("FAIL") end
end

local function driveTests()
    periphemu.create("left", "drive")
    local p = peripheral.wrap("left")

    assert(p.isDiskPresent(), false)
    p.insertDisk(649)
    assert(p.isDiskPresent(), true)
    assert(p.getDiskID(), 649)
    assert(p.getDiskLabel(), nil)
end

driveTests()

shell.run("shutdown")