effects: fix typo
parent
6667aa1238
commit
2f5d4ff512
|
@ -46,7 +46,7 @@ M: effect effect>string ( effect -- string )
|
||||||
GENERIC: stack-effect ( word -- effect/f )
|
GENERIC: stack-effect ( word -- effect/f )
|
||||||
|
|
||||||
M: word stack-effect
|
M: word stack-effect
|
||||||
"inferred-effect" "declared-effect"
|
"declared-effect" "inferred-effect"
|
||||||
[ word-prop ] bi-curry@ bi or ;
|
[ word-prop ] bi-curry@ bi or ;
|
||||||
|
|
||||||
M: effect clone
|
M: effect clone
|
||||||
|
|
Loading…
Reference in New Issue