[Bug-apl] Patch: correct quad-AI[2] in --rawCIN mode

[David Lamkins]

--rawCIN mode wasn't accounting for input wait time, causing quad-AI[2] to
always be identical to quad-AI[3]. The attached patch corrects this.

-- 
"The secret to creativity is knowing how to hide your sources."
   Albert Einstein


http://soundcloud.com/davidlamkins
http://reverbnation.com/lamkins
http://reverbnation.com/lcw
http://lamkins-guitar.com/
http://lamkins.net/
http://successful-lisp.com/

Index: src/LineInput.cc
===================================================================
--- src/LineInput.cc	(revision 465)
+++ src/LineInput.cc	(working copy)
@@ -582,7 +582,9 @@
         Quad_QUOTE::done(mode != LIM_Quote_Quad, LOC);
         CIN << '\r' << prompt;
         char buffer[4000];
+        const APL_time_us from = now();
         const char * s = fgets(buffer, sizeof(buffer) - 1, stdin);
+        Workspace::add_wait(now() - from);
         if (s == 0)
            {
              eof = true;