harn-vm 0.7.20

Async bytecode virtual machine for the Harn programming language
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101

/** metadata_namespace. */
pub fn metadata_namespace(dir, namespace) {
  return metadata_resolve(dir, namespace) ?? {}
}

/** metadata_local_namespace. */
pub fn metadata_local_namespace(dir, namespace) {
  let normalized = if dir == "" { "." } else { dir }
  for entry in metadata_entries(namespace) {
    if entry.dir == normalized {
      return entry.local ?? {}
    }
  }
  return {}
}

/** project_inventory. */
pub fn project_inventory(namespace) {
  return {
    entries: metadata_entries(namespace),
    status: metadata_status(namespace),
  }
}

/** project_root_package. */
pub fn project_root_package() -> string {
  var root_package = ""
  let root_enrichment = metadata_get("", "enrichment")
  if root_enrichment?.rootPackageName {
    root_package = root_enrichment?.rootPackageName
  }
  if !root_package {
    let src_enrichment = metadata_get("src", "enrichment")
    if src_enrichment?.rootPackageName {
      root_package = src_enrichment?.rootPackageName
    }
  }
  if !root_package {
    let project_root = project_root() ?? ""
    if project_root {
      let scan = project_scan(project_root, {tiers: ["ambient", "config"]})
      if scan?.package_name {
        root_package = scan.package_name
      }
    }
  }
  return root_package
}

/** project_scan. */
pub fn project_scan(path = ".", options = nil) {
  return project_scan_native(path, options ?? {})
}

/** project_scan_tree. */
pub fn project_scan_tree(path = ".", options = nil) {
  return project_scan_tree_native(path, options ?? {})
}

/** project_catalog. */
pub fn project_catalog() {
  return project_catalog_native()
}

/** project_scan_paths. */
pub fn project_scan_paths(path = ".", options = nil) {
  return project_scan_tree(path, options).keys()
}

/** project_stale. */
pub fn project_stale(namespace) {
  return metadata_status(namespace).stale
}

/** project_stale_dirs. */
pub fn project_stale_dirs(namespace) {
  let stale = project_stale(namespace)
  var dirs = []
  for dir in stale.tier1 {
    dirs = dirs + [dir]
  }
  for dir in stale.tier2 {
    dirs = dirs + [dir]
  }
  return dirs
}

/** project_requires_refresh. */
pub fn project_requires_refresh(namespace) {
  let status = metadata_status(namespace)
  if status.stale.any_stale {
    return true
  }
  for _dir in status.missing_structure_hash {
    return true
  }
  for _dir in status.missing_content_hash {
    return true
  }
  return false
}