From e4eafd14e1abfebba1e984623dfe3eb62a5d11ec Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Wed, 20 Jun 2012 10:27:28 -0500
Subject: [PATCH] Added @literal-algol{} and started an algol60 test suite
 (apologies if there already was one that I didn't find). Also fixed syntax
 error raising procedure.

closes PR 12859

original commit: c0b928c758cc64b7b902fbe38838d31a3c1bc008
---
 collects/algol60/cfg-parser.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/algol60/cfg-parser.rkt b/collects/algol60/cfg-parser.rkt
index aa7438e..8309fb8 100644
--- a/collects/algol60/cfg-parser.rkt
+++ b/collects/algol60/cfg-parser.rkt
@@ -485,7 +485,7 @@
       [(_ clause ...)
        (let ([clauses (syntax->list #'(clause ...))])
          (let-values ([(start grammar cfg-error parser-clauses)
-		       (let ([all-toks (apply
+                       (let ([all-toks (apply
 					append
 					(map (lambda (clause)
 					       (syntax-case clause (tokens)