src/d2c/compiler/parser support.dylan,1.2,1.3

Update of /var/lib/cvs/src/d2c/compiler/parser
In directory cantor:/tmp/cvs-serv26302

Modified Files:
        support.dylan 
Log Message:
Bug: 6984
Specify location where the error occured.


Index: support.dylan
===================================================================
RCS file: /var/lib/cvs/src/d2c/compiler/parser/support.dylan,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- support.dylan       24 Jan 2000 04:56:35 -0000      1.2
+++ support.dylan       18 Apr 2004 21:23:55 -0000      1.3
@@ -7,7 +7,7 @@
 //======================================================================
 //
 // Copyright (c) 1995, 1996, 1997  Carnegie Mellon University
-// Copyright (c) 1998, 1999, 2000  Gwydion Dylan Maintainers
+// Copyright (c) 1998 - 2004  Gwydion Dylan Maintainers
 // All rights reserved.
 // 
 // Use and copying of this software and preparation of derivative
@@ -733,7 +733,7 @@
        = truncate/(action, ash(1, $action-bits));
       select (action-kind)
        $error-action =>
-         compiler-fatal-error("Parse error at or before %s", lookahead);
+         compiler-fatal-error-location(lookahead-srcloc, "Parse error at or 
before %s", lookahead);
 
        $accept-action =>
          if (debug?)



!DSPAM:4082f222264571368615611!



_______________________________________________
Gd-chatter mailing list
Gd-chatter@xxxxxxxxxxxxxxxx
http://www.gwydiondylan.org/mailman/listinfo/gd-chatter