 (defvar emacspeak-maths-request-counter 0
   "Counter tracking output from NodeJS.")
 
-(defvar emacspeak-maths-results ()
+(defvar emacspeak-maths-results nil
   "S-expression received from Node.")
 
 
 (defgroup emacspeak-maths nil
-  "Customize Emacspeak spoken Maths.")
+  "Customize Emacspeak  Maths.")
 
 (defcustom emacspeak-maths-inferior-program
   (executable-find "node")

;;}}}
;;{{{  Required modules

(require 'cl)
(declaim  (optimize  (safety 0) (speed 3)))
;(require 'emacspeak-preamble)



;;}}}
;;{{{ Setup:

(defun emacspeak-maths-start-node ()
  "Start up Node as a comint sub-process."
  (declare (special emacspeak-maths-inferior-program emacspeak-maths-node-buffer))
  (setq emacspeak-maths-node-buffer(make-comint emacspeak-maths-inferior-program))
  (setq emacspeak-maths-node-process (get-buffer-process emacspeak-maths-node-buffer))
  (add-hook 'comint-preoutput-filter-functions #'emacspeak-maths-comint-filter))

;;}}}
(provide 'emacspeak-maths)
