def segments_ok
near-v-framework@0.4.0.0 · domain/architecture/system/release/ops.bend:161
import near-v-framework@0.4.0.0/domain/architecture/system/release/ops.bend as Ops
import Base
161def segments_ok(ss: List<&2, String>) -> Bool:
162 match ss:
163 case []:
164 True{}
165 case +s <> rest:
166 match rest:
167 case []:
168 String.eq(s, "LICENSE") || (is_source(s) && name_chars_ok(String.to_list(stem(s)), True{}))
169 case _ <> _:
170 name_chars_ok(String.to_list(s), True{}) && segments_ok(rest)