[Gcl-devel] Re: interrupts in 64-bit GCL

[Matt Kaufmann]

Thanks!  When I get the word from Dave that a new GCL is ready to
test, I'll give it a try.

-- Matt
   Cc: address@hidden, address@hidden, address@hidden
   From: Camm Maguire <address@hidden>
   Date: Tue, 03 Mar 2009 12:12:44 -0500
   X-SpamAssassin-Status: No, hits=-2.6 required=5.0
   X-UTCS-Spam-Status: No, hits=-202 required=165

   Greetings, and thanks!  OK I think this is fixed now in both
   branches.  Here is the 2.6.8pre patch to read.d:

   @@ -638,7 +646,7 @@
    static void
    Lleft_parenthesis_reader()
    {
   -    object in, c, x;
   +    object in, x;
           object *p;

           check_arg(2);
   @@ -654,18 +662,17 @@
                   if (dot_flag) {
                           if (p == &vs_head)
           FEerror("A dot appeared after a left parenthesis.", 0);
   +                    delimiting_char = code_char(')');
                           in_list_flag = TRUE;
                           *p = read_object(in);
                           if (dot_flag)
           FEerror("Two dots appeared consecutively.", 0);
   -                    c = read_char(in);
   -                    while (cat(c) == cat_whitespace)
   -                            c = read_char(in);
   -                    if (char_code(c) != ')')
   -    FEerror("A dot appeared before a right parenthesis.", 0);
   -                    else if (PP0>P0) PP0--; /* should be the only other 
place
   -                                               outside of read_object where
   -                                               closing parens are read */
   +                    if (*p==OBJNULL)
   +    FEerror("Object missing after dot.", 0);
   +                    delimiting_char = code_char(')');
   +                    in_list_flag = TRUE;
   +                    if (read_object(in)!=OBJNULL)
   +        FEerror("Two objects after dot.",0);
                           goto ENDUP;
                   }
                   vs_push(x);

   Take care,
   -- 
   Camm Maguire                                     address@hidden
   ==========================================================================
   "The earth is but one country, and mankind its citizens."  --  Baha'u'llah