NAME<\/a> ______________________________________________________________________________<\/p>\n platform \u2212 System identification support code and utilities<\/p>\n package require platform ?1.0.10?<\/b><\/p>\n platform::generic The platform<\/b> package provides several utility commands useful for the identification of the architecture of a machine running Tcl.<\/p>\n Whilst Tcl provides the tcl_platform<\/b> array for identifying the current architecture (in particular, the platform and machine elements) this is not always sufficient. This is because (on Unix machines) tcl_platform<\/b> reflects the values returned by the uname<\/b> command and these are not standardized across platforms and architectures. In addition, on at least one platform (AIX) the tcl_platform(machine)<\/b> contains the CPU serial number.<\/p>\n Consequently, individual applications need to manipulate the values in tcl_platform<\/b> (along with the output of system specific utilities) – which is both inconvenient for developers, and introduces the potential for inconsistencies in identifying architectures and in naming conventions.<\/p>\n The platform<\/b> package prevents such fragmentation – i.e., it establishes a standard naming convention for architectures running Tcl and makes it more convenient for developers to identify the current architecture a Tcl program is running on.<\/p>\n platform::identify<\/b><\/p>\n This command returns an identifier describing the platform the Tcl core is running on. The returned identifier has the general format OS<\/i>–CPU<\/i>. The OS<\/i> part of the identifier may contain details like kernel version, libc version, etc., and this information may contain dashes as well. The CPU<\/i> part will not contain dashes, making the preceding dash the last dash in the result.<\/p>\n platform::generic<\/b><\/p>\n This command returns a simplified identifier describing the platform the Tcl core is running on. In contrast to platform::identify<\/b> it leaves out details like kernel version, libc version, etc. The returned identifier has the general format OS<\/i>–CPU<\/i>.<\/p>\n platform::patterns<\/b> identifier<\/i><\/p>\n This command takes an identifier as returned by platform::identify<\/b> and returns a list of identifiers describing compatible architectures.<\/p>\n This can be used to allow an application to be shipped with multiple builds of a shared library, so that the same package works on many versions of an operating system. For example:<\/p>\n package require platform<\/b> operating system, cpu architecture, platform, architecture<\/p>\n platform \u2212 System identification support code and utilities <\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3783,1],"tags":[2635,2919],"class_list":["post-6320","post","type-post","status-publish","format-standard","hentry","category-n-comandos-tcl-tk","category-sin-categoria","tag-mann","tag-platform"],"gutentor_comment":0,"_links":{"self":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts\/6320","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/comments?post=6320"}],"version-history":[{"count":0,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/posts\/6320\/revisions"}],"wp:attachment":[{"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/media?parent=6320"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/categories?post=6320"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/lode.uno\/linux-man\/wp-json\/wp\/v2\/tags?post=6320"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
SYNOPSIS<\/a>
DESCRIPTION<\/a>
COMMANDS<\/a>
EXAMPLE<\/a>
KEYWORDS<\/a> <\/p>\n
\nNAME <\/a> <\/h2>\n
SYNOPSIS <\/a> <\/h2>\n
platform::identify
platform::patterns<\/b> identifier<\/i> ______________________________________________________________________________<\/p>\nDESCRIPTION <\/a> <\/h2>\n
COMMANDS <\/a> <\/h2>\n
EXAMPLE <\/a> <\/h2>\n
# Assume that app script is …\/theapp\/bin\/theapp.tcl
set binDir [file dirname [file normalize [info script]]]
set libDir [file join $binDir .. lib]
set platLibDir [file join $libDir [platform::identify<\/b>]]
load [file join $platLibDir support[info sharedlibextension]]<\/p>\nKEYWORDS <\/a> <\/h2>\n
\n","protected":false},"excerpt":{"rendered":"