(use ursetto-html)

(render
 (page
  "Ursetto Consulting, Inc."
  'articles
  (content
   `(p "Below are some tutorials and documentation that Ursetto Consulting, Inc. has written on various subjects.  These articles were all written with "
       (a (@ (href "eggdoc.html")) "eggdoc")
       ", which is a documentation tool I originally wrote to simplify and standardize code library documentation, and which has also proved suitable for articles.")
   `(h4 "Articles")
   `(ul (@ (class "doclist"))
        (li (a (@ (href "manipulating-itunes-plist.html"))
               "Manipulating property list files in Scheme")
            ": This tutorial covers reading and writing OS X property lists with my Objective C interface.  It showcases an iterative development process which, through exploration at an interpreter prompt, gradually builds an application from the ground up.")
        (li (a (@ (href "Currency%20Converter.png"))
               (img (@ (style "float:right;margin-left:1em;")
                       (src "Currency%20Converter.jpg")
                       (alt "[Currency Converter screenshot]"))))
            (a (@ (href "creating-a-cocoa-app.html"))
               "Creating a Cocoa Application in Chicken")
            ": This is a walkthrough of an implementation of Currency Converter in Chicken Scheme, following Apple's "
            (a (@ (href "http://developer.apple.com/documentation/Cocoa/Conceptual/ObjCTutorial/index.html"))
               "Cocoa Application Tutorial")
            ".")
        (li (a (@ (href "quack-pretty-lambda.html"))
               "Quack pretty-lambda on Carbon Emacs")
            ": Covers some of the thornier issues encountered when getting the pretty lambda fontification of quack.el to work on OS X."))
   `(h4 "Documentation")
   `(a (@ (href "Color%20View.png"))
       (img (@ (style "float:left;margin: 0 1em 1em 0;padding-right:0.5em;")
               (src "Color%20View.jpg")
               (alt "[Color View screenshot]"))))
   `(ul (@ (class "doclist"))
        (li (a (@ (href "objc.html"))
               "Objective C interface to Scheme")
            ": The reference documentation for the Objective C interface in Scheme, which allows you to write Cocoa applications for OS X.")
        (li (a (@ (href "eggdoc.html")) "eggdoc")
            ": a tool for standardized code documentation.")
        (li (a (@ (href "hostinfo.html")) "hostinfo")
            ": host, service and protocol information.")
        (li (a (@ (href "args.html")) "args")
            ": command-line argument processing facilities, with automatic generation of help text.")
        (li (a (@ (href "itunes.scm"))
               "plist article source")
            ": The source to the "
            (em "plist")
            " tutorial above, which is first parsed into eggdoc format, then sent to eggdoc to build the HTML.  As this file can be loaded into an interpreter, it could be considered an example of literate programming."))

   `(h4 "Website source")
   `(p "This site is generated using Chicken Scheme.  My resume uses the " ,(egg-link "sxml-transforms") " and " ,(egg-link "sxml-tools") " eggs, while the rest of the site uses one of " ,(link "/src/ursetto-html.scm" "my own transformers") ".  You can " ,(link "/src" "view all the source here") ".")
   
   )))