qwreey
1e070e3f1f
- EpochMap.luau: Update/Peek/Refresh/Sync/TrackFrom, EpochSet은 집합, 키 weak (state-epoch-plan §3).
- State.luau: InitState(module) → 인스턴스별 임플(implFor로 Source/Store에 전달). _emitDown은
스냅샷 후 sub:_receive(from)(H-163), _receive 규칙 1~3, 시딩 Sync/TrackFrom, 카운터 쌍(H-85),
Get의 Refresh 순회(값만), fn(self=리시버 lazy 핸들, previous?, ...deps), With pass-through,
Apply(fn | __apply 객체, H-158), _hold 강참조. Compute 결과 isModifier 가드, dep isState 검증.
- Source.luau: Set 동일값도 emit(H-68)/Emit/isModifier 가드, SourceBrand+EpochBrand.
- Store.luau: 그림자=store 자신, defaults isSource 화이트리스트 + RESERVED 가드(H-122/H-153),
Of(모듈의 Source를 호출 시점에)/Names.
- quad-types: StateData/State/Source/Store 타입(ty11 최종형), export type function CheckReservedKeys,
Quad에 Source/Store. Compute deps는 ...any — 타입팩 D...는 strict에서 기각(H-176, 스파이크 15 닫힘).
- spec.{epochmap,source,state,store}.luau, spec.init에 Source/Store. ROADMAP 단위 2 체크박스,
round11 §5 단위 2 확인 목록, 세션 원문·요약.
Co-authored-by: qwreey <me@qwreey.moe>
101 lines
3.6 KiB
Text
101 lines
3.6 KiB
Text
--[[
|
|
Source 계약 — `.claude/base/source-state-plan.md` "Source는 독립 공개 프리미티브로 격상" /
|
|
"`Source:Set(v)`는 동일값이어도 항상 갱신하고 emit한다" / "`:Emit()`" / "따름정리 — Modifier",
|
|
`.claude/base/modifier-plan.md` 7번, `.claude/base/brand-plan.md`(다중 태깅).
|
|
]]
|
|
|
|
local Quad = require("../src")
|
|
local Brand = require("../src/Brand")
|
|
local QuadTypes = require("../roblox_packages/quad_types")
|
|
|
|
type Source<T> = QuadTypes.Source<T>
|
|
|
|
local Source = Quad.Source
|
|
|
|
print("=== 1. 생성 — 값, Revision 0, SourceBrand+EpochBrand 다중 태깅, StateBrand엔 미등록 ===")
|
|
do
|
|
local s = Source(5)
|
|
assert(s:Get() == 5, "default is the value")
|
|
assert(s.Revision == 0, "initial revision")
|
|
assert(Quad.isSource(s) and Quad.isEpoch(s), "Source is both Source and Epoch")
|
|
assert(Quad.isState(s), "isState passes a Source by composition")
|
|
assert(Brand.StateBrand:is(s) == false, "…but it is NOT registered in StateBrand (predicate composition, not double registration)")
|
|
assert(not Quad.isRef(s) and not Quad.isStore(s), "nothing else")
|
|
local n: Source<number?> = Source(nil :: number?)
|
|
assert(n:Get() == nil, "Source(nil) holds nil")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== 2. :Set — 값 갱신 + 리비전 감소 랩 + self 반환; 동일값도 항상 (H-68) ===")
|
|
do
|
|
local s = Source(1 :: any)
|
|
assert(s:Set(2) == s, "Set returns self")
|
|
assert(s:Get() == 2 and s.Revision == 4294967295, "value moved, revision wrapped from 0")
|
|
local r1 = s.Revision
|
|
s:Set(2) -- same value
|
|
assert(s.Revision ~= r1, "same value still bumps the revision")
|
|
local t = {}
|
|
s:Set(t :: any)
|
|
assert(s:Get() == t, "Get returns the live reference")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== 3. :Emit — 값은 그대로, 리비전만 갱신, self 반환 ===")
|
|
do
|
|
local s = Source({ n = 1 })
|
|
local rev = s.Revision
|
|
s:Get().n = 2
|
|
assert(s:Emit() == s and s.Revision ~= rev and s:Get().n == 2, "Emit bumps revision without touching the value")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== 4. Modifier 가드 — 생성자와 Set 둘 다, level 2 ===")
|
|
do
|
|
local mod = {}
|
|
Brand.ModifierBrand:register(mod)
|
|
local ok, err = pcall(function()
|
|
Source(mod :: any)
|
|
end)
|
|
assert(not ok and string.find(tostring(err), "Modifier", 1, true) ~= nil, "constructor rejects: " .. tostring(err))
|
|
assert(string.find(tostring(err), "spec.source.luau", 1, true) ~= nil, "level 2 points at the caller")
|
|
local s = Source(1)
|
|
local ok2, err2 = pcall(function()
|
|
s:Set(mod :: any)
|
|
end)
|
|
assert(not ok2 and string.find(tostring(err2), "Modifier", 1, true) ~= nil, "Set rejects: " .. tostring(err2))
|
|
assert(s:Get() == 1, "value untouched after the rejected Set")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== 5. State 메소드 위임 — Source에서 With/Compute/Apply가 바로 됨 ===")
|
|
do
|
|
local s = Source(3)
|
|
local doubled: QuadTypes.State<number> = s:Compute(function(x): number
|
|
return x:Get() * 2
|
|
end)
|
|
assert(doubled:Get() == 6, "Compute through a Source")
|
|
local w: QuadTypes.State<number> = s:With(Source(0))
|
|
assert(w:Get() == 3, "With passes self's value through")
|
|
local applied = s:Apply(function(st: QuadTypes.StateData<number>): number
|
|
return st:Get() + 1
|
|
end)
|
|
assert(applied == 4, "Apply(fn) is just fn(self)")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== 6. 인스턴스별 팩토리 (H-174) — 다른 New()의 Source는 다른 임플, 브랜드는 공유 ===")
|
|
do
|
|
local other = Quad.New()
|
|
local a, b = Quad.Source(1), other.Source(1)
|
|
assert(getmetatable(a :: any) ~= getmetatable(b :: any), "each quad instance has its own Source impl")
|
|
assert(Quad.isSource(b) and other.isSource(a), "brands are shared leaf modules")
|
|
print("PASS")
|
|
end
|
|
|
|
print()
|
|
print("=== ALL PASS ===")
|