Handbook
Glossary
text<< ( value object -- )
Vocabulary
accessors
Inputs
value
an
object
object
an
object
Outputs
None
Definition
IN:
accessors
GENERIC:
text<<
( value object -- )
Methods
USING:
accessors
alien
alien.c-types
alien.syntax
classes.struct
classes.struct.private
readline.ffi
;
M:
UNDO_LIST
text<<
T{
struct-slot-spec
{
name
"text"
}
{
offset 16
}
{
class
c-ptr
}
{
type
pointer:
char
}
}
write-struct-slot
;
inline
USING:
accessors
help.apropos
slots.private
;
M:
apropos-search
text<<
2
set-slot
;
inline
USING:
accessors
kernel
slots
slots.private
strings
xml.data
;
M:
cdata
text<<
[
dup
string?
[
\
string
bad-slot-value
]
unless
]
dip
2
set-slot
;
inline
USING:
accessors
kernel
slots
slots.private
strings
xml.data
;
M:
comment
text<<
[
dup
string?
[
\
string
bad-slot-value
]
unless
]
dip
2
set-slot
;
inline
USING:
accessors
alien.c-types
classes.struct
classes.struct.private
compression.zlib.ffi
math
;
M:
gz_header
text<<
T{
struct-slot-spec
{
name
"text"
}
{
offset 0
}
{
class
fixnum
}
{
initial 0
}
{
type
int
}
}
write-struct-slot
;
inline
USING:
accessors
farkup
slots.private
;
M:
image
text<<
3
set-slot
;
inline
USING:
accessors
kernel
slots
slots.private
strings
xml.data
;
M:
instruction
text<<
[
dup
string?
[
\
string
bad-slot-value
]
unless
]
dip
2
set-slot
;
inline
USING:
accessors
images.png
slots.private
;
M:
itext
text<<
5
set-slot
;
inline
USING:
accessors
slots.private
ui.gadgets.labels
;
M:
label
text<<
20
set-slot
;
inline
USING:
accessors
arrays
kernel
lexer
slots
slots.private
;
M:
lexer
text<<
[
dup
array?
[
\
array
bad-slot-value
]
unless
]
dip
2
set-slot
;
inline
USING:
accessors
db.queries
slots.private
;
M:
likeexp
text<<
2
set-slot
;
inline
USING:
accessors
farkup
slots.private
;
M:
link
text<<
3
set-slot
;
inline
USING:
accessors
slots.private
xmode.rules
;
M:
matcher
text<<
2
set-slot
;
inline
USING:
accessors
irc.messages
slots.private
;
M:
notice
text<<
10
set-slot
;
inline
USING:
accessors
db.postgresql.errors
slots.private
;
M:
parse-postgresql-location
text<<
4
set-slot
;
inline
USING:
accessors
irc.messages
slots.private
;
M:
privmsg
text<<
10
set-slot
;
inline
USING:
accessors
slots.private
ui.tools.inspector.slots
;
M:
slot-editor
text<<
27
set-slot
;
inline
USING:
accessors
irc.messages
slots.private
;
M:
squery
text<<
10
set-slot
;
inline
USING:
accessors
slots.private
subrip-subtitles
;
M:
srt-chunk
text<<
6
set-slot
;
inline
USING:
accessors
html.parser
slots.private
;
M:
tag
text<<
4
set-slot
;
inline
USING:
accessors
modern.html
slots.private
;
M:
text
text<<
2
set-slot
;
inline
USING:
accessors
slots.private
twitter
;
M:
twitter-status
text<<
4
set-slot
;
inline