Scheme 在Chez方案中查找操作系统和机器类型

Chez Scheme程序或库如何（从方案代码中）找出它运行的操作系统和机器体系结构

第6.10节。字节向量 第12.4节。编译、评估和加载 第12.15节。环境查询和设置 不幸的是，

（机器类型）

是Chez惯用的神秘字符串（而不是标准符号，如

x86-64

），可能因版本而异。其他程序的工作方式显而易见

我在回购协议中找到了这些

解析机器类型 机器类型字符串的构造如下所示：

以空字符串开始

对于支持线程的生成，请附加字母

t

附加机器架构

附加操作系统

当前体系结构和操作系统：

(define arch-pairs
  '(("a6"    . amd64)
    ("arm32" . arm32)
    ("i3"    . i386)
    ("ppc32" . ppc32)))

(define os-pairs
  '(("fb"  . freebsd)
    ("le"  . linux)
    ("nb"  . netbsd)
    ("nt"  . windows)
    ("ob"  . openbsd)
    ("osx" . macos)
    ("qnx" . qnx)
    ("s2"  . solaris)))

要查找所有机器类型，请在中查找名为

Mf-*

的所有makefiles

(machine-type)                  import (chezscheme)

(scheme-version)                import (chezscheme)
(scheme-version-number)         import (chezscheme)
(petite?)                       import (chezscheme)
(threaded?)                     import (chezscheme)
(interactive?)                  import (chezscheme)

(define arch-pairs
  '(("a6"    . amd64)
    ("arm32" . arm32)
    ("i3"    . i386)
    ("ppc32" . ppc32)))

(define os-pairs
  '(("fb"  . freebsd)
    ("le"  . linux)
    ("nb"  . netbsd)
    ("nt"  . windows)
    ("ob"  . openbsd)
    ("osx" . macos)
    ("qnx" . qnx)
    ("s2"  . solaris)))