{$CLEO .s}
{$INCLUDE_ONCE ../cleo_tester.inc}

script_name "0A98" // get_vehicle_pointer
test("0A98 (get_object_pointer)", tests)
terminate_this_custom_script

function tests

    it("should return a valid pointer", test1)
    return

    function test1
        request_model 333 // golf club
        load_all_models_now
        int handle = create_object 333 {xyz} 0.0 0.0 0.0

        int ptr = 0
        ptr = get_object_pointer handle
        mark_object_as_no_longer_needed handle

        assert_ptr(ptr)
    end
end