Changeset 15077 in project for chicken/trunk


Ignore:
Timestamp:
06/27/09 15:07:40 (10 years ago)
Author:
felix winkelmann
Message:

minor doc and compiler fixes; tested compiler-syntax

Location:
chicken/trunk
Files:
9 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/chicken-install.scm

    r15000 r15077  
    6363      "csi.import.so"
    6464      "irregex.import.so"
    65       "compiler.import.so"))
     65      "types.db"))
    6666
    6767  (define *program-path*
  • chicken/trunk/compiler.scm

    r15074 r15077  
    771771                               (body (caddr x))
    772772                               (name (##sys#strip-syntax var se #t)))
    773                            (##sys#put!
    774                             name '##compiler#compiler-syntax
    775                             (##sys#cons
    776                              (##sys#er-transformer (eval/meta body))
    777                              (##sys#current-environment)))
    778                           (##sys#register-meta-expression
    779                            `(##sys#put!
    780                              (##core#syntax ,name)
    781                              '##compiler#compiler-syntax
    782                              (##sys#cons
    783                               (##sys#er-transformer ,body)
    784                               (##sys#current-environment))) )
     773                          (##sys#put!
     774                           name '##compiler#compiler-syntax
     775                           (##sys#cons
     776                            (##sys#er-transformer (eval/meta body))
     777                            (##sys#current-environment)))
    785778                          (walk '(##core#undefined) e se dest)))
    786779
     
    791784                                           (list
    792785                                            name
    793                                             (cons (##sys#er-transformer (eval/meta (cadr x))) se)
     786                                            (cons (##sys#er-transformer (eval/meta (cadr b))) se)
    794787                                            (##sys#get name '##compiler#compiler-syntax) ) ) )
    795788                                       (cadr x))))
  • chicken/trunk/distribution/manifest

    r15020 r15077  
    237237tests/lolevel-tests.scm
    238238tests/feeley-dynwind.scm
     239tests/compiler-syntax-tests.scm
    239240tweaks.scm
    240241utils.scm
  • chicken/trunk/manual/Acknowledgements

    r14555 r15077  
    1515Egesund, Steve Elkins, Daniel B. Faken, Will Farr, Graham Fawcett,
    1616Marc Feeley, Fizzie, Matthew Flatt, Kimura Fuyuki, Tony Garnock-Jones,
    17 Martin Gasbichler, Joey Gibson, Stephen C. Gilardi, Joshua Griffith,
    18 Johannes Groedem, Damian Gryski, Mario Domenech Goulart, Andreas
    19 Gustafsson, Sven Hartrumpf, Jun-ichiro itojun Hagino, Ahdi Hargo,
    20 Matthias Heiler, Karl M. Hegbloom, William P. Heinemann, Bill Hoffman,
    21 Bruce Hoult, Hans Huebner, Markus Huelsmann, Goetz Isenmann, Paulo
    22 Jabardo, Wietse Jacobs, David Janssens, Christian Jaeger, Matt Jones,
    23 Dale Jordan, Valentin Kamyshenko, Daishi Kato, Peter Keller, Brad
    24 Kind, Ron Kneusel, Matthias Koeppe, Krysztof Kowałczyk, Andre
    25 Kuehne, Todd R. Kueny Sr, Goran Krampe, David Krentzlin, Ben Kurtz,
    26 Micky Latowicki, John Lenz, Kirill Lisovsky, Juergen Lorenz, Kon
    27 Lovett, Lam Luu, Leonardo Valeri Manera, Dennis Marti, Charles Martin,
    28 Bob McIsaac, Alain Mellan, Eric Merrit, Perry Metzger, Scott
    29 G. Miller, Mikael, Bruce Mitchener, Chris Moline, Eric E. Moore,
    30 Julian Morrison, Dan Muresan, Lars Nilsson, Ian Oversby, o.t., Gene
    31 Pavlovsky, Levi Pearson, Nicolas Pelletier, Carlos Pita, Robin Lee
    32 Powell, Pupeno, Davide Puricelli, presto, Doug Quale, Eric Raible,
    33 Ivan Raikov, Joel Reymont, Eric Rochester, Andreas Rottman, David
    34 Rush, Lars Rustemeier, Daniel Sadilek, Oskar Schirmer, Burton
     17Martin Gasbichler, Abdulaziz Ghuloum, Joey Gibson, Stephen C. Gilardi,
     18Mario Domenech Goulart, Joshua Griffith, Johannes Groedem, Damian
     19Gryski, Andreas Gustafsson, Sven Hartrumpf, Jun-ichiro itojun Hagino,
     20Ahdi Hargo, Matthias Heiler, Karl M. Hegbloom, William P. Heinemann,
     21Bill Hoffman, Bruce Hoult, Hans Huebner, Markus Huelsmann, Goetz
     22Isenmann, Paulo Jabardo, Wietse Jacobs, David Janssens, Christian
     23Jaeger, Matt Jones, Dale Jordan, Valentin Kamyshenko, Daishi Kato,
     24Peter Keller, Brad Kind, Ron Kneusel, Matthias Koeppe, Krysztof
     25Kowałczyk, Andre Kuehne, Todd R. Kueny Sr, Goran Krampe, David
     26Krentzlin, Ben Kurtz, Micky Latowicki, John Lenz, Kirill Lisovsky,
     27Juergen Lorenz, Kon Lovett, Lam Luu, Leonardo Valeri Manera, Dennis
     28Marti, Charles Martin, Bob McIsaac, Alain Mellan, Eric Merrit, Perry
     29Metzger, Scott G. Miller, Mikael, Bruce Mitchener, Chris Moline, Eric
     30E. Moore, Julian Morrison, Dan Muresan, Lars Nilsson, Ian Oversby,
     31o.t., Gene Pavlovsky, Levi Pearson, Nicolas Pelletier, Carlos Pita,
     32Robin Lee Powell, Pupeno, Davide Puricelli, presto, Doug Quale, Eric
     33Raible, Ivan Raikov, Joel Reymont, Eric Rochester, Andreas Rottman,
     34David Rush, Lars Rustemeier, Daniel Sadilek, Oskar Schirmer, Burton
    3535Samograd, Reed Sheridan, Ronald Schroeder, Spencer Schumann, Ivan
    3636Shcheklein, Alex Shinn, Ivan Shmakov, Shmul, Tony Sidaway, Jeffrey
  • chicken/trunk/manual/Unit files

    r13683 r15077  
    8282stripped.
    8383
     84==== normalize-pathname
     85
     86<procedure>(normalize-pathname PATHNAME [PLATFORM])</procedure>
     87
     88Performs a simple "normalization" on the {{PATHNAME}}, suitably for
     89{{PLATFORM}}, which defaults to the value of {{(build-platform)}}.
     90Currently, this just converts forward slashes to backslashes on Windows.
     91
    8492==== directory-null?
    8593
  • chicken/trunk/manual/Unit utils

    r13683 r15077  
    6262port that is the current value of {{(current-input-port)}}.
    6363
     64
     65=== Shell argument quoting
     66
     67==== qs
     68
     69 [procedure] (qs STRING [PLATFORM])
     70
     71Escapes {{STRING}} suitably for passing to a shell command on {{PLATFORM}}.
     72{{PLATFORM}} defaults to the value of {{(build-platform)}} and indicates in
     73which style the argument should be quoted. On Windows systems, the string
     74is simply enclosed in double-quote ({{"}}) characters, on UNIXish systems,
     75characters that would have a special meaning to the shell are escaped
     76using backslash ({{\}}).
     77
     78
    6479---
    6580Previous: [[Unit posix]]
  • chicken/trunk/scripts/test-dist.sh

    r13857 r15077  
    7474
    7575# Install a few eggs
     76$prefix/bin/chicken-install prometheus
    7677$prefix/bin/chicken-install opengl
    7778
  • chicken/trunk/scripts/wiki2html.scm

    r15075 r15077  
    221221        (('procedure strs ...)
    222222         `(pre "\n [procedure] " ,@strs))
     223        (('nowiki content ...)
     224         `(div ,content))
    223225        (((? symbol? tag) ('@ attr ...) . body)
    224226         `(,tag (@ ,@attr) ,@(map walk body)))
  • chicken/trunk/tests/runtests.sh

    r15074 r15077  
    6363#$compile_s -s foo.import.scm
    6464#$interpret -bnq -e '(require-library meta-syntax-test)' -e '(import foo)' -e '(bar 1 2)'
     65
     66echo "======================================== compiler syntax tests ..."
     67$compile compiler-syntax-tests.scm
     68./a.out
    6569
    6670echo "======================================== import library tests ..."
Note: See TracChangeset for help on using the changeset viewer.