Handbook
Glossary
factorcode.org
rewrite-element ( obj -- )
Vocabulary
locals.rewrite
Inputs
obj
an
object
Outputs
None
Definition
IN:
locals.rewrite
GENERIC:
rewrite-element
( obj -- )
Methods
USING:
assocs
hashtables
kernel
locals.rewrite
make
;
M:
hashtable
rewrite-element
dup
rewrite-literal?
[
>alist
rewrite-sequence
\
>hashtable
,
]
[
,
]
if
;
USING:
locals.rewrite
locals.types
;
M:
lambda
rewrite-element
rewrite-sugar*
;
USING:
locals.errors
locals.rewrite
locals.types
;
M:
let
rewrite-element
let-form-in-literal-error
;
USING:
locals.rewrite
locals.types
make
;
M:
local-reader
rewrite-element
,
;
USING:
locals.errors
locals.rewrite
locals.types
;
M:
local-writer
rewrite-element
local-writer-in-literal-error
;
USING:
locals.rewrite
locals.types
make
;
M:
local
rewrite-element
,
;
USING:
kernel
locals.rewrite
make
;
M:
object
rewrite-element
,
;
USING:
locals.rewrite
quotations
;
M:
quotation
rewrite-element
rewrite-sugar*
;
USING:
kernel
locals.rewrite
make
sequences
;
M:
sequence
rewrite-element
dup
rewrite-literal?
[
rewrite-sequence
]
[
,
]
if
;
USING:
classes
classes.tuple
kernel
locals.rewrite
make
;
M:
tuple
rewrite-element
dup
rewrite-literal?
[
[
tuple-slots
rewrite-elements
]
[
class-of
]
bi
[
boa
]
curry
%
]
[
,
]
if
;
USING:
kernel
locals.rewrite
make
words
;
M:
word
rewrite-element
<wrapper>
,
;
USING:
kernel
locals.rewrite
make
;
M:
wrapper
rewrite-element
rewrite-wrapper
\
<wrapper>
,
;