Skip to content

Instantly share code, notes, and snippets.

@AeroNotix

AeroNotix/gist:7179e3715320aafa6034164748e87fa5 Secret

Created September 20, 2018 13:42
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save AeroNotix/7179e3715320aafa6034164748e87fa5 to your computer and use it in GitHub Desktop.
Save AeroNotix/7179e3715320aafa6034164748e87fa5 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(defvar *cpus*
(max 1
#-win32 (sb-alien:alien-funcall
(sb-alien:extern-alien "sysconf"
(function sb-alien:long sb-alien:int))
sb-unix::sc-nprocessors-onln)
#+win32 (sb-alien:extern-alien "os_number_of_processors" sb-alien:int)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment