Custom Query (1030 matches)

Once a process is allowed to run to exhaustion, it never again responds to process-interrupt:

(let ((p (make-process "Test")))

  ;; Let it run through once
  (process-preset p #'(lambda () nil))
  (process-enable p)
  (process-wait "exhaust" #'(lambda () (process-exhausted-p p)))

  ;; Now revive it and try to interrupt it
  (process-preset p #'(lambda () (sleep 10)))
  (process-reset p)
  (process-enable p)
  (sleep 1)
  (let ((test :never))
    (process-interrupt p #'(lambda () (setq test :interrupt)))
    (process-wait "exhaust" #'(lambda () (process-exhausted-p p)))
    test))

ClozureCL seems to switch to scientific notation when doing format ~F before the number becomes too large or small.

Example:

CCL> (format t "~F" 0.0001)
1.0E-4  ;; Expected: 0.0001

From CLHS Section 22.3.3.1:

If w is omitted, then if the magnitude of arg is so large (or, if d is also omitted, so small) that more than 100 digits would have to be printed, then an implementation is free, at its discretion, to print the number using exponential notation instead, as if by the directive ~E (with all parameters to ~E defaulted, not taking their values from the ~F directive).

I read that to mean that if less than 100 digits would be printed, then it's required to use fixed point representation.

MCL 5.0 actually gets this right, so I/we/somebody might be able to merge code from MCL's Lib/format.lisp into CCL's file of the same name.

SBCL has a sb-debug::backtrace-as-list function which returns the backtrace summary in list form. This is useful for certain kinds of tracing and profiling. The attached diff adds a similar function to OpenMCL/CCL.