writeonce/tests/corpus/run/bytes-carrier/fixture.wo
shoney.arickathil 771180fd28 feat: iterations 19 + 17 — Float/Bytes scalars (.wob v5), library kind + internal/
- Float full stack: literals (fraction/exponent; `0..10` still a range), f64
  opcodes 34-41, @table column, WAL bit-exact replay, json fractions in and
  shortest-round-trip out. IEEE-quiet — FDIV never traps where DIV does.
- Bytes: a wo_str with its own class id, so alloc/free/copy are shared but no
  Text builtin accepts one; len/at/slice/eq/concat, base64 both ways, json
  boundary as base64; TEXT_COPY preserves the kind.
- No implicit Int/Float mixing (WO-E201 in the typechecker, not the emitter,
  which picks the opcode from one side and would misread the other).
- One IEEE deviation: float_cmp total order (NaN last, -0.0 == +0.0) for
  indexes and order-by, keys canonicalized to match. `?Float` nil is a
  reserved quiet NaN — the zero word is +0.0, WO_NIL_SCALAR's bits are -2.0.
- Renderer prefers fixed over exponential in 1e-6..1e21: pure shortest makes
  a price of 900.0 read `9e+02`. One renderer for interp/json/float_to_text.
- Fixed en route: lexer double-counted the leading digit; is_scalar_shaped
  took Float/Bytes as Int-shaped; Bytes ownership needed a shared heap-scalar
  predicate or temps never dropped; order-by bit-compared negatives backwards.
- Iteration 17: `kind = "library"` (absent = program; bad value = WO-E109),
  entry-less check mode retiring the `--emit` workaround, Go's `internal/` as
  WO-E108 at the consumer's `use`. Driver-only; VM/.wob/GC untouched.
- Framework reorg: internal/{parse,serve}.wo; http/form.wo split out to keep
  media_type/form_values public (parse.wo had grown public surface).
- Docs: link audit (97 -> 88 broken, conflict markers resolved, 2 duplicate
  stories removed), 00-code-review verified 26/27, iterations re-sequenced.
- Also carries the pre-staged pub(read)/using/#if work from the index.
- Gates: corpus 103/0, test_wal 156/0, web-app 26/0, oop-accept ALL MET.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
2026-08-20 19:24:15 +02:00

43 lines
1.4 KiB
Text

-- Iteration 19: Bytes, the binary carrier. Length-carrying, content-
-- comparable, no literal form — built from text or from base64, which is how
-- it will arrive once WebSocket frames and digests exist (iteration 24 and
-- the crypto fork). Text goes back to meaning text.
fn main() {
let raw = bytes_of_text("writeonce")
print_int(bytes_len(raw))
print_int(bytes_at(raw, 0))
-- slicing is clamped like substr, and produces a fresh Bytes
let head = bytes_slice(raw, 0, 5)
print(text_of_bytes(head))
print(text_of_bytes(bytes_slice(raw, 5, 99)))
print_int(bytes_len(bytes_slice(raw, 99, 3)))
-- content equality, not identity
print_int(bytes_eq(raw, bytes_of_text("writeonce")))
print_int(bytes_eq(raw, head))
-- concat
print(text_of_bytes(bytes_concat(head, bytes_of_text("!"))))
-- base64 round trip, including the two padding shapes
print(base64_encode(raw))
print(base64_encode(bytes_of_text("ab")))
print(base64_encode(bytes_of_text("a")))
let back = base64_decode("d3JpdGVvbmNl")
if back != nil {
print_int(bytes_eq(back, raw))
}
-- binary safety: a NUL byte in the middle survives, which is the whole
-- reason Text-as-bytes was a hole
let nul = base64_decode("YQBi")
if nul != nil {
print_int(bytes_len(nul))
print_int(bytes_at(nul, 1))
}
-- malformed base64 is nil, not a trap: it arrives from the network
print_int(base64_decode("!!!!") == nil)
print_int(base64_decode("abc") == nil)
}