Question

用Lisp如何判断Windows系统是32位还是64位

Answer 1

看你使用的搏携吵是什么lisp，下面这段是隐闹autolisp下的判断方法，
;;;判断系统是否为64位基侍
(defun Is64Bit (/ WMI SVR SYS)
(setq WMI (vlax-create-object "WbemScripting.SWbemLocator"))
(setq SVR (VLAX-INVOKE WMI 'ConnectServer))
(vlax-for n (vlax-invoke SVR 'InstancesOf "Win32_ComputerSystem")
(setq SYS (vlax-get n 'SystemType))
)
(vlax-release-object SVR)
(vlax-release-object WMI)
(wcmatch sys "x64*")
)