/*
  StarForth — Steady-State Virtual Machine Runtime

  Copyright (c) 2023–2025 Robert A. James
  All rights reserved.

  Licensed under the StarForth License, Version 1.0
*/

#ifndef __STARKERNEL__
#error "vm_identity.c is kernel-only"
#endif

#include "starkernel/vm_identity.h"

int vm_identity_has_cap(const VMIdentity *id, uint32_t cap) {
    if (!id || !id->installed) return 0;
    return (id->acl_caps & cap) == cap;
}