ハードウェア情報を返すCommon Lisp関数

上から順に、ハードウェア種別、OS、マシン名、実装系、そのバージョン、内部ストレージ情報。こんな関数も用意されていたのですね。

* (machine-type)

"X86"
* (software-type)

"Darwin"
* (machine-instance)

"xxxxxxxx.xxxxxxxx.xx.jp"
* (lisp-implementation-type)

"SBCL"
* (lisp-implementation-version)

"1.0.25"
* (room)

Dynamic space usage is:   43,323,712 bytes.
Read-only space usage is:      2,824 bytes.
Static space usage is:         1,616 bytes.
Control stack usage is:        1,240 bytes.
Binding stack usage is:          336 bytes.
Garbage collection is currently enabled.

Breakdown for dynamic space:
  10,317,032 bytes for    13,369 code objects.
  10,291,272 bytes for 1,286,409 cons objects.
   8,053,392 bytes for   201,081 instance objects.
   5,156,720 bytes for   107,914 simple-vector objects.
  10,698,472 bytes for   422,485 other objects.
  44,516,888 bytes for 2,031,258 dynamic objects (space total.)