IN: accessors

GENERIC: name>> ( object -- value )

USING: accessors alien.parser slots.private ;

M: *-in-c-type-name name>> 2 slot ; inline

USING: accessors cuda.ptx kernel.private slots.private strings
;

M: .struct name>> 2 slot { string } declare ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private kernel readline.ffi ;

M: FUNMAP name>>
T{ struct-slot-spec
{ name "name" }
{ offset 0 }
{ class object }
{ type c-string }
} read-struct-slot ; inline

USING: accessors alien alien.syntax classes.struct
classes.struct.private glib.ffi
gobject-introspection.standard-types ;

M: GSource name>>
T{ struct-slot-spec
{ name "name" }
{ offset 80 }
{ class c-ptr }
{ type pointer: gchar }
} read-struct-slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private kernel x11.xinput2.ffi ;

M: XIAddMasterInfo name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class object }
{ type c-string }
} read-struct-slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private kernel x11.xinput2.ffi ;

M: XIDeviceInfo name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class object }
{ type c-string }
} read-struct-slot ; inline

USING: accessors dns slots.private ;

M: a name>> 2 slot ; inline

USING: accessors dns slots.private ;

M: aaaa name>> 2 slot ; inline

USING: accessors bank slots.private ;

M: account name>> 2 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: alias name>> 2 slot ; inline

USING: accessors infix.ast slots.private ;

M: ast-array name>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast ;

M: ast-assignment name>> 2 slot { ast-name } declare ; inline

USING: accessors peg.javascript.ast slots.private ;

M: ast-binding name>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: ast-class name>> 2 slot { string } declare ; inline

USING: accessors fjsc slots.private ;

M: ast-define name>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: ast-foreign name>> 3 slot { string } declare ; inline

USING: accessors infix.ast slots.private ;

M: ast-function name>> 2 slot ; inline

USING: accessors fjsc slots.private ;

M: ast-in name>> 2 slot ; inline

USING: accessors infix.ast slots.private ;

M: ast-local name>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: ast-method name>> 2 slot { string } declare ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: ast-name name>> 2 slot { string } declare ; inline

USING: accessors peg.javascript.ast slots.private ;

M: ast-new name>> 2 slot ; inline

USING: accessors infix.ast slots.private ;

M: ast-slice name>> 2 slot ; inline

USING: accessors fjsc slots.private ;

M: ast-use name>> 2 slot ; inline

USING: accessors peg.javascript.ast slots.private ;

M: ast-var name>> 2 slot ; inline

USING: accessors kernel.private slots.private strings xml.data
;

M: attlist-decl name>> 2 slot { string } declare ; inline

USING: accessors regexp.parser slots.private ;

M: bad-class name>> 2 slot ; inline

USING: accessors slots.private words ;

M: bad-create name>> 2 slot ; inline

USING: accessors slots.private smalltalk.compiler.lexenv ;

M: bad-identifier name>> 2 slot ; inline

USING: accessors slots slots.private ;

M: bad-initial-value name>> 2 slot ; inline

USING: accessors slots.private xml.errors ;

M: bad-name name>> 4 slot ; inline

USING: accessors slots.private vocabs.metadata ;

M: bad-platform name>> 2 slot ; inline

USING: accessors slots.private vocabs ;

M: bad-vocab-name name>> 2 slot ; inline

USING: accessors alien alien.c-types alien.syntax
classes.struct classes.struct.private openssl.libcrypto ;

M: bio-method name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class c-ptr }
{ type pointer: void }
} read-struct-slot ; inline

USING: accessors slots.private webapps.planet ;

M: blog name>> 3 slot ; inline

USING: accessors s3 slots.private ;

M: bucket name>> 2 slot ; inline

USING: accessors slots.private xml.errors ;

M: capitalized-prolog name>> 4 slot ; inline

USING: accessors slots.private usa-cities ;

M: city name>> 3 slot ; inline

USING: accessors opencl slots.private ;

M: cl-device name>> 48 slot ; inline

USING: accessors opencl slots.private ;

M: cl-platform name>> 5 slot ; inline

USING: accessors kernel.private slots.private xml.data ;

M: closer name>> 2 slot { name } declare ; inline

USING: accessors dns slots.private ;

M: cname name>> 2 slot ; inline

USING: accessors codebook slots.private ;

M: code-file name>> 2 slot ; inline

USING: accessors reddit.private slots.private ;

M: comment name>> 17 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: const name>> 2 slot ; inline

USING: accessors kernel.private slots.private xml.data ;

M: contained name>> 2 slot { name } declare ; inline

USING: accessors continuations slots.private ;

M: continuation name>> 5 slot ; inline

USING: accessors http slots.private ;

M: cookie name>> 2 slot ; inline

USING: accessors cuda.libraries slots.private ;

M: cuda-library name>> 2 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: data-type name>> 2 slot ; inline

USING: accessors couchdb kernel.private slots.private strings ;

M: db name>> 3 slot { string } declare ; inline

USING: accessors io.directories slots.private ;

M: directory-entry name>> 2 slot ; inline

USING: accessors kernel.private slots.private strings xml.data
;

M: doctype-decl name>> 2 slot { string } declare ; inline

USING: accessors classes.struct classes.struct.private macho ;

M: dylib name>>
T{ struct-slot-spec
{ name "name" }
{ offset 0 }
{ class lc_str }
{ initial S{ lc_str { offset 0 } { ptr f } } }
{ type lc_str }
} read-struct-slot ; inline

USING: accessors classes.struct classes.struct.private macho ;

M: dylinker_command name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class lc_str }
{ initial S{ lc_str { offset 0 } { ptr f } } }
{ type lc_str }
} read-struct-slot ; inline

USING: accessors peg.ebnf.private slots.private ;

M: ebnf-foreign-not-found name>> 2 slot ; inline

USING: accessors peg.ebnf.private slots.private ;

M: ebnf-var name>> 3 slot ; inline

USING: accessors kernel.private slots.private strings xml.data
;

M: element-decl name>> 2 slot { string } declare ; inline

USING: accessors rosetta-code.top-rank slots.private ;

M: employee name>> 2 slot ; inline

USING: accessors kernel.private slots.private strings xml.data
;

M: entity-decl name>> 2 slot { string } declare ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: enum-member name>> 2 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: field name>> 2 slot ; inline

USING: accessors fonts slots.private ;

M: font name>> 2 slot ; inline

USING: accessors llvm.invoker slots.private ;

M: function name>> 2 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: function name>> 2 slot ; inline

USING: accessors classes.struct classes.struct.private macho ;

M: fvmfile_command name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class lc_str }
{ initial S{ lc_str { offset 0 } { ptr f } } }
{ type lc_str }
} read-struct-slot ; inline

USING: accessors classes.struct classes.struct.private macho ;

M: fvmlib name>>
T{ struct-slot-spec
{ name "name" }
{ offset 0 }
{ class lc_str }
{ initial S{ lc_str { offset 0 } { ptr f } } }
{ type lc_str }
} read-struct-slot ; inline

USING: accessors gdbm kernel.private slots.private strings ;

M: gdbm name>> 2 slot { string } declare ; inline

USING: accessors gobject-introspection slots.private ;

M: gir-not-found name>> 2 slot ; inline

USING: accessors slots.private unix.groups ;

M: group name>> 3 slot ; inline

USING: accessors slots.private tar ;

M: hard-link name>> 3 slot ; inline

USING: accessors kernel.private mongodb.driver slots.private
strings ;

M: index-spec name>> 3 slot { string } declare ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private kernel unix.linux.inotify ;

M: inotify-event name>>
T{ struct-slot-spec
{ name "name" }
{ offset 16 }
{ class object }
{ type { char 0 } }
} read-struct-slot ; inline

USING: accessors compiler.cfg.instructions.syntax slots.private
;

M: insn-slot-spec name>> 3 slot ; inline

USING: accessors interpolate.private slots.private ;

M: interpolate-var name>> 2 slot ; inline

USING: accessors alien.cxx.demangle.libstdcxx slots.private ;

M: invalid-demangle-args name>> 2 slot ; inline

USING: accessors locals.parser slots.private ;

M: invalid-local-name name>> 2 slot ; inline

USING: accessors alien.cxx.demangle.libstdcxx slots.private ;

M: invalid-mangled-name name>> 2 slot ; inline

USING: accessors classes.tuple.parser slots.private ;

M: invalid-slot-name name>> 2 slot ; inline

USING: accessors irc.client.chats slots.private ;

M: irc-channel-chat name>> 4 slot ; inline

USING: accessors irc.client.chats slots.private ;

M: irc-nick-chat name>> 4 slot ; inline

USING: accessors rosetta-code.knapsack slots.private ;

M: item name>> 2 slot ; inline

USING: accessors s3 slots.private ;

M: key name>> 2 slot ; inline

USING: accessors help.topics slots.private ;

M: link name>> 2 slot ; inline

USING: accessors infix.private slots.private ;

M: local-not-defined name>> 2 slot ; inline

USING: accessors alien alien.c-types alien.syntax
classes.struct classes.struct.private lua ;

M: luaL_Reg name>>
T{ struct-slot-spec
{ name "name" }
{ offset 0 }
{ class c-ptr }
{ type pointer: char }
} read-struct-slot ; inline

USING: accessors alien alien.c-types alien.syntax
classes.struct classes.struct.private lua ;

M: lua_Debug name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class c-ptr }
{ type pointer: char }
} read-struct-slot ; inline

USING: accessors game.models.obj.private slots.private ;

M: material name>> 2 slot ; inline

USING: accessors kernel.private mongodb.driver slots.private
strings ;

M: mdb-collection name>> 2 slot { string } declare ; inline

USING: accessors mongodb.connection slots.private ;

M: mdb-db name>> 2 slot ; inline

USING: accessors alien.fortran.private slots.private ;

M: misc-type name>> 5 slot ; inline

USING: accessors irc.messages slots.private ;

M: mode name>> 9 slot ; inline

USING: accessors kernel.private mongodb.cmd.private
slots.private strings ;

M: mongodb-cmd name>> 2 slot { string } declare ; inline

USING: accessors mime.multipart slots.private ;

M: multipart name>> 10 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: namespace name>> 2 slot ; inline

USING: accessors help.topics slots.private ;

M: no-article name>> 2 slot ; inline

USING: accessors slots.private smalltalk.classes ;

M: no-class name>> 2 slot ; inline

USING: accessors cuda.libraries slots.private ;

M: no-cuda-library name>> 2 slot ; inline

USING: accessors alien.libraries slots.private ;

M: no-library name>> 2 slot ; inline

USING: accessors classes.tuple slots.private ;

M: no-slot name>> 2 slot ; inline

USING: accessors colors.constants slots.private ;

M: no-such-color name>> 2 slot ; inline

USING: accessors compiler.errors slots.private ;

M: no-such-library name>> 2 slot ; inline

USING: accessors slots.private usa-cities ;

M: no-such-state name>> 2 slot ; inline

USING: accessors alien.libraries slots.private ;

M: no-such-symbol name>> 2 slot ; inline

USING: accessors compiler.errors slots.private ;

M: no-such-symbol name>> 2 slot ; inline

USING: accessors furnace.utilities slots.private ;

M: no-such-word name>> 2 slot ; inline

USING: accessors slots.private xml.syntax.private ;

M: no-tag name>> 2 slot ; inline

USING: accessors peg.ebnf.private slots.private ;

M: no-tokenizer name>> 2 slot ; inline

USING: accessors slots.private vocabs ;

M: no-vocab name>> 2 slot ; inline

USING: accessors slots.private vocabs.parser ;

M: no-word-error name>> 2 slot ; inline

USING: accessors slots.private smalltalk.compiler ;

M: no-word name>> 2 slot ; inline

USING: accessors slots.private xml.errors ;

M: nonexist-ns name>> 4 slot ; inline

USING: accessors regexp.parser slots.private ;

M: nonexistent-option name>> 2 slot ; inline

USING: accessors kernel.private slots.private strings xml.data
;

M: notation-decl name>> 2 slot { string } declare ; inline

USING: accessors dns slots.private ;

M: ns name>> 2 slot ; inline

USING: accessors kernel.private slots.private xml.data ;

M: opener name>> 2 slot { name } declare ; inline

USING: accessors checksums.openssl slots.private ;

M: openssl-checksum name>> 2 slot ; inline

USING: accessors irc.messages slots.private ;

M: oper name>> 9 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: parameter name>> 2 slot ; inline

USING: accessors peg.ebnf.private slots.private ;

M: parser-not-found name>> 2 slot ; inline

USING: accessors slots.private tools.deploy.test.17 ;

M: person name>> 2 slot ; inline

USING: accessors classes.struct classes.struct.private macho ;

M: prebound_dylib_command name>>
T{ struct-slot-spec
{ name "name" }
{ offset 8 }
{ class lc_str }
{ initial S{ lc_str { offset 0 } { ptr f } } }
{ type lc_str }
} read-struct-slot ; inline

USING: accessors slots.private unix.linux.proc ;

M: proc-cpu-stat name>> 2 slot ; inline

USING: accessors slots.private unix.linux.proc ;

M: proc-partition name>> 5 slot ; inline

USING: accessors gpu.shaders kernel.private slots.private words
;

M: program name>> 2 slot { word } declare ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: property name>> 2 slot ; inline

USING: accessors alien.c-types classes.struct
classes.struct.private kernel unix.ffi ;

M: protoent name>>
T{ struct-slot-spec
{ name "name" }
{ offset 0 }
{ class object }
{ type c-string }
} read-struct-slot ; inline

USING: accessors dns slots.private ;

M: ptr name>> 2 slot ; inline

USING: accessors cuda.ptx kernel.private slots.private strings
;

M: ptx-entry name>> 2 slot { string } declare ; inline

USING: accessors cuda.ptx kernel.private slots.private strings
;

M: ptx-struct-definition name>> 2 slot { string } declare ;
inline

USING: accessors cuda.ptx kernel.private slots.private strings
;

M: ptx-variable name>> 7 slot { string } declare ; inline

USING: accessors dns slots.private ;

M: query name>> 2 slot ; inline

USING: accessors slots.private zoneinfo ;

M: raw-rule name>> 2 slot ; inline

USING: accessors slots.private zoneinfo ;

M: raw-zone name>> 2 slot ; inline

USING: accessors furnace.auth slots.private ;

M: realm name>> 4 slot ; inline

USING: accessors peg.ebnf.private slots.private ;

M: redefined-rule name>> 2 slot ; inline

USING: accessors ftp.client.listing-parser slots.private ;

M: remote-file name>> 12 slot ; inline

USING: accessors continuations slots.private ;

M: restart name>> 2 slot ; inline

USING: accessors slots.private xml-rpc ;

M: rpc-method name>> 2 slot ; inline

USING: accessors irc.messages slots.private ;

M: rpl-nickname-in-use name>> 9 slot ; inline

USING: accessors dns slots.private ;

M: rr name>> 2 slot ; inline

USING: accessors slots.private xmode.rules ;

M: rule-set name>> 2 slot ; inline

USING: accessors slots.private zoneinfo ;

M: rule name>> 2 slot ; inline

USING: accessors elf slots.private ;

M: section name>> 2 slot ; inline

USING: accessors gpu.shaders kernel.private slots.private words
;

M: shader name>> 2 slot { word } declare ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: signal name>> 2 slot ; inline

USING: accessors inspector.private slots.private ;

M: slot-name name>> 2 slot ; inline

USING: accessors slots slots.private ;

M: slot-spec name>> 2 slot ; inline

USING: accessors reddit.private slots.private ;

M: story name>> 21 slot ; inline

USING: accessors reddit.private slots.private ;

M: subreddit name>> 11 slot ; inline

USING: accessors elf slots.private ;

M: symbol name>> 2 slot ; inline

USING: accessors kernel.private slots.private smalltalk.ast
strings ;

M: symbol name>> 2 slot { string } declare ; inline

USING: accessors slots.private tar ;

M: symbolic-link name>> 3 slot ; inline

USING: accessors kernel.private slots.private xml.data ;

M: tag name>> 2 slot { name } declare ; inline

USING: accessors html.parser slots.private ;

M: tag name>> 2 slot ; inline

USING: accessors slots.private tar ;

M: tar-header name>> 2 slot ; inline

USING: accessors kernel.private slots.private strings threads ;

M: thread name>> 2 slot { string } declare ; inline

USING: accessors io.servers slots.private ;

M: threaded-server name>> 2 slot ; inline

USING: accessors slots.private twitter ;

M: twitter-user name>> 3 slot ; inline

USING: accessors gobject-introspection.repository slots.private
;

M: type name>> 2 slot ; inline

USING: accessors slots.private smalltalk.compiler ;

M: unbound-local name>> 2 slot ; inline

USING: accessors gpu.render kernel.private slots.private
strings ;

M: uniform name>> 2 slot { string } declare ; inline

USING: accessors c.preprocessor slots.private ;

M: unknown-c-preprocessor name>> 3 slot ; inline

USING: accessors checksums.openssl slots.private ;

M: unknown-digest name>> 2 slot ; inline

USING: accessors reddit.private slots.private ;

M: user name>> 11 slot ; inline

USING: accessors gpu.shaders kernel.private slots.private
strings ;

M: vertex-attribute name>>
2 slot { maybe{ string } } declare ; inline

USING: accessors help.vocabs slots.private ;

M: vocab-author name>> 2 slot ; inline

USING: accessors slots.private vocabs ;

M: vocab-link name>> 2 slot ; inline

USING: accessors slots.private vocabs.hierarchy ;

M: vocab-prefix name>> 2 slot ; inline

USING: accessors help.vocabs slots.private ;

M: vocab-tag name>> 2 slot ; inline

USING: accessors slots.private vocabs ;

M: vocab name>> 2 slot ; inline

USING: accessors slots.private words ;

M: word name>> 2 slot ; inline

USING: accessors kernel xml.data ;

M: xml name>> [ body>> ] call \ name>> execute ;

USING: accessors slots.private zoneinfo ;

M: zone-not-found name>> 2 slot ; inline

USING: accessors slots.private zoneinfo ;

M: zone name>> 2 slot ; inline