diff options
author | dos-reis <gdr@axiomatics.org> | 2009-07-25 03:36:38 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2009-07-25 03:36:38 +0000 |
commit | 0d661cf09b5f357230ee63dd079b04fc8138d235 (patch) | |
tree | 41b56088233fc0b078629e49defb4eaba298c62c /src/interp | |
parent | 6ca6195b5b843d2e5ca482cb7cf6eee934853ae6 (diff) | |
download | open-axiom-0d661cf09b5f357230ee63dd079b04fc8138d235.tar.gz |
* configure.ac.pamphlet: Reject SBCL-1.0.29 as too buggy to build
OpenAxiom.
src/
Fix SF/2798962
* interp/c-doc.boot (checkDecorate): Don't insert formatting
braces in Spad mode.
Diffstat (limited to 'src/interp')
-rw-r--r-- | src/interp/c-doc.boot | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/interp/c-doc.boot b/src/interp/c-doc.boot index ce5958d2..7355d14f 100644 --- a/src/interp/c-doc.boot +++ b/src/interp/c-doc.boot @@ -1,6 +1,6 @@ -- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd. -- All rights reserved. --- Copyright (C) 2007-2008, Gabriel Dos Reis. +-- Copyright (C) 2007-2009, Gabriel Dos Reis. -- All rights reserved. -- -- Redistribution and use in source and binary forms, with or without @@ -806,7 +806,9 @@ checkDecorate u == acc x = char '_$ or x = '"$" => ['"\$",:acc] x = char '_% or x = '"%" => ['"\%",:acc] - x = char '_, or x = '"," => ['",{}",:acc] + x = char '_, or x = '"," => + spadflag => ['",",:acc] + ['",{}",:acc] x = '"\spad" => ['"\spad",:acc] STRINGP x and DIGITP x.0 => [x,:acc] not spadflag and |