((section 2 "Outdated egg!" (p "This is an egg for CHICKEN 4, the unsupported old release.  You're almost certainly looking for " (int-link "/eggref/5/peep" "the CHICKEN 5 version of this egg") ", if it exists.") (p "If it does not exist, there may be equivalent functionality provided by another egg; have a look at the " (link "https://wiki.call-cc.org/chicken-projects/egg-index-5.html" "egg index") ". Otherwise, please consider porting this egg to the current version of CHICKEN.") (toc) (tags "egg" "internals")) (section 2 "peep" (section 3 "Introduction" (p "The " (tt "peep") " extension can be loaded into the " (tt "chicken") " compiler to interactively explore the internal database during compilation of a program.")) (section 3 "Requirements" (p (int-link "dissector") ".") (p "If the " (int-link "readline") " extension is installed, the interactive prompt supports line-editing.")) (section 3 "Usage" (p "Pass " (tt "peep") " to the " (tt "-extend") " option while compiling a file. This sets the " (tt "user-post-analysis-hook") " and will start a read-eval-print loop after all optimizations have been performed. You can enter a number of commands (described below) to inspect the analysis database and node tree.") (p "See " (int-link "/chicken-compilation-process" "A guide to the CHICKEN compilation process") " and " (int-link "/chicken-internal-structure" "A guide to the CHICKEN compiler") " for more information about the database and the way " (tt "chicken") " compiles Scheme to C code.") (p "Before the compilation starts, a file named " (tt ".peeprc") " will be loaded, if it exists, either from the current directory, or from the user's home directory.")) (section 3 "Commands" (p "When the REPL is started, you can enter arbitrary Scheme expressions, including any of the following commands:") (pre " (.pp [X])            [.p]     pretty-print node or other value (defaults to program graph)\n (.dump)              [.d]     dump database\n (.find NAME)         [.f]     find symbol in database\n (.show SYMBOL)       [.s]     show properties of symbol\n (.get SYMBOL PROP)   [.g]     get symbol property\n (.set SYMBOL PROP X)          set symbol property\n (.select PROP ...)   [.sel]   return list of symbols that have given properties\n (.inspect [X])       [.i]     inspect value (defaults to program graph)\n (.props)                      list valid symbol properties\n (.quit)              [.q]     continue compilation until finished\n (.continue [PASS])   [.c]     continue until PASS is reached or to next analysis\n (.help)              [.h]     show this message") (p "The special expression " (tt "#") " holds the result of the last entered expression.")) (section 3 "Authors" (p (int-link "/users/felix winkelmann" "felix winkelmann"))) (section 3 "License" (pre "Copyright (c) 2007, Felix L. Winkelmann\nAll rights reserved.") (pre "Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following\nconditions are met:") (pre "  Redistributions of source code must retain the above copyright notice, this list of conditions and the following\n    disclaimer. \n  Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following\n    disclaimer in the documentation and/or other materials provided with the distribution. \n  Neither the name of the author nor the names of its contributors may be used to endorse or promote\n    products derived from this software without specific prior written permission. ") (pre "THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS \"AS IS\" AND ANY EXPRESS\nOR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY\nAND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR\nCONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\nCONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR\nSERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\nTHEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR\nOTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE\nPOSSIBILITY OF SUCH DAMAGE.")) (section 3 "Version History" (dl (dt "0.4.1") (dd "Got rid of deprecated " (tt "getenv") " calls") (dt "0.4") (dd "Marked as obsolete") (dt "0.3") (dd "ported to CHICKEN 4") (dt "0.2") (dd ".peeprc, adapted to CHICKEN 2.621, new commands, dropped readline requirement") (dt "0.1") (dd "initial release")))))