(test-begin "hardware-info") (define cpus (cpu-count)) (test-assert (number? cpus)) (write cpus) (newline) (test-end "hardware-info")