This past Saturday was our first ski tour of the year. Crappy weather (IE, lack of snow) combined with not being near mountains has made it easy to not follow through on anything this year. So late Friday night we decided we had to go, even if there was no snow, we had to drive to the base of a mountain with the intent to ski. Just to break the pattern.

The downside of this was our packing and planning was accomplished during commercials in NBC’s Olympics coverage. This meant I had too many down jackets (at least they’re light), nothing to cover my face, and not really paid much attention to the route.

We planned to hit Mount Moosilauke in the White Mountains of New Hampshire. The 5.3 mile climb of 2,720 feet seemed like a nice grade, and an easy downhill run. So how did it become a 7.7 mile climb with an extra 500 feet? One wrong turn.

Now, I knew I was making a wrong turn when it happened – or at least strongly suspected it. But I wasn’t too concerned, because there were plenty of ski tracks around, and the signs said “to summit”, so how wrong could it be?

Rather than taking our intended route from [Ridge Lodge] direct to the [summit] and back down, we made a wrong turn (because the other direction had no tracks), following all the other skiers. At a [river crossing] we checked the map and verified the mistake, but figured “hey, lots of others have gone this way and our guidebook is 11 years old – this might be the better bet” so we continued on. At the [Al Merrill branch], we realized that all the tracks we had been following were headed for the Al Merrill Loop. The loop (which I haven’t been on) is supposed to be a nice tour, with easy skiing that goes from the [Al Merrill branch] back to the [Ridge Lodge]. But while we didn’t want to push ourselves too hard, we also didn’t want to cut our skiing in half. So we decided to continue on to the [summit], breaking trail through a foot or more of snow, between the [Al Merrill branch] and the [Beaver Brook trail merge]. The trail-breaking was fun, but it slowed us down. And the additional milage and climbing were not part of our original schedule. We didn’t hit the [summit] until almost 17:00. Which meant we had about an hour until it was too dark to see anything.

Before we got to the summit, we passed a hiker who said the conditions weren’t too bad, “you can see cairn to cairn”. Yeah, it was a bit overcast, but cairn to cairn? I would have guessed the visibility was better than that. It wasn’t. It was slightly worse, even. Soon after we passed treeline, Diana got knocked over by the wind – apparently at ~30 MPH, but gusty. Thankfully we were more visible to each other than the rime-covered cairns were to us. I’d have to lead ahead a bit before I could see the next cairn. I kept Diana about one cairn back so I had a retreat point in case I didn’t spot the next one. Of course, once actually getting to the [summit], we had to stop for pictures. No amount of wind-blown snow building up on our clothes is going to stop that part of the trip. Leaving the summit for the Gorge Brook trail was more of the same, and we were excited when we hit the trees and the trail was right there in front of us. Now we just had to get down.

Here’s another bit of the poor planning. My memory of the guide book said that the ski trail was about 15 feet wide – great for making turns and getting down comfortably. But no, that was for the Moosilauke Carriage Road trail, the trail we decided not to take because snowmobiles are allowed on it for most of the length, and we didn’t want to deal with that. The Gorge Brook trail was narrow. A quote from the guidebook that I must have skimmed over the first time: “You turn where the trail turns, relishing surprises around each bend.” Yeah, I’d say that’s an accurate description – wish I had read it beforehand.

Even without having read it, had we followed our original plan we would have been aware of it, since we would have been climbing our eventual descent. But we made it down in one piece, and without splashing into the brook at any of the many opportunities. Well, most of the way down. Before we finished the run, it had gotten too dark to really ski safely. So we took off our skis and booted down the last section.

When we got to main junction of half a dozen trails at the bottom, we needed the headlamp to read the signs. Unfortunately, none of the signs mentioned the [Ridge Lodge]. We deduced the direction of the lodge (or so we hoped), by checking its direction on the map against the direction of the various trails that were labeled. When we saw the sign labeled “PARKING →” we were encouraged, but it wasn’t until we met with the scene of our original wrong turn that we really felt relieved. Of course, we still had almost two miles to go, but we were certain of what that distance held.

We stopped to skin up again for the final push. For me, this is where the exhaustion set in. If I kept up a rhythm, I was ok. It was stopping to grab a snack, or to keep from getting too far ahead of Diana that my legs felt like they would give out. But the end was in sight – just had to keep pushing until the car was in view.

Back at the car, we were pretty excited. There were some harrowing bits, but we came through it and did a decent job with our hardest tour ever, despite my complete planning failure. And got just enough “this could be bad” hints to make sure I don’t slack off on it again.

I had made hot chocolate in the morning, and it waited for us in the car, still hot 12+ hours after I made it. We didn’t even stop for our traditional Tilt’n Diner dinner on the way home, because we were already late for the Olympics. We made it in time to see Lindsey Vonn take home bronze in the Super-G though, so the day wasn’t a total waste.

Yesterday I competed in the Dark Horse Bouldering Series at MetroRock. This was my first climbing competition ever, and really my first competition of any kind in many years (unless you count job interviews).

After the disaster that was the solo performance requirement during my brief stint as a music composition major in college, I really worked to avoid anything that involved people watching me. Co-workers at Amazon may recall shaky, stuttering presentations – even when the only audience was my own team, who were friends I spent all my time with.

I’m not sure where my performance anxiety started, but I remember when I was a high school intern where my Dad worked, I would watch him give talks in front of hundreds of people. He seemed so relaxed and confident and capable up there. I was waiting for the point when I would be like that. I wondered when the transition would happen, when I would suddenly no longer be nervous to have people paying attention to me. Of course, the magic transition never happened, and at some point it became apparent that I might have to actually work to overcome my insecurities. Well, that didn’t sound very appealing, so I avoided anything that involved attention being placed on me. Sometimes I’d use my performance anxiety as an excuse to try to get someone else to take over (this didn’t usually work, as it turns out not many people are actually enthusiastic about public speaking).

My panic about these things usually starts weeks in advance. I think I managed to avoid some of the panic build-up in this case since I really only considered doing the bouldering comp about a week before it started, when – flush from my recent NaNoWriMo success – I blogged that I was going to do it. Now, blogging about something you’re working on will have one of two effects. If it’s something vague with no timeline, your brain will equate the talking about it with the doing of it, and you won’t do it. If it’s something short-term and well-defined, the people you tell will ask you about it and the motivation to not have to say “I gave up,” will push you through.

I’ve tried to take both angles on this in various parts of my life. I have big open-ended projects, and I’ve started to be more close-mouthed about them – not through any attempt at secrecy, but just to avoid sabotaging myself. And I’ve become more public about things like NaNoWriMo and the bouldering comp, which I would have kept to myself previously, so I wouldn’t be too embarrassed if I fell short. The next step is to come up with more definite small steps within the open-ended projects, so I can be public about those steps in order to be motivated to complete them.

In both NaNoWriMo and the bouldering comp, there were various points at which I would have given up had I not told anyone of my plans. With the bouldering comp, I even avoided registering until I showed up at the gym in the morning – convinced I would find some excuse not to compete by then. It was only through the support and encouragement of people I told that I managed to stay in the game.

The bouldering competition didn’t exactly have a ton of public performance (at least not the part I did – the dyno comp and pro competitors are another story), but for each problem you climbed, you needed to get two other competitors to sign off that you completed it. So you not only needed to make sure a couple people were watching, but afterward have to ask them, “did you see me climb that?” without seeming self-congratulatory about climbing one of the easiest problems in the gym. That was kind of hard for me. Thankfully, everyone there was super-nice, and after my first three sends my anxiety about the whole thing was more-or-less gone (although it was more and more difficult to not sound self-congratulatory as I started climbing harder routes).

The way the competition works is like this: there are about 70 problems, each has a point value (from 25 to 1160) that relates to its difficulty (for the climbers out there, divide by 100 to get the Vermin grade – so from V0 to V11). You get unlimited attempts on each problem, and your 5 hardest problems get added up for your total score. There are some common strategies – since you only need five sends in the four hour competition, that’s one every 48 minutes, so take your time and work the problems (taking a few falls) so you can pull out some hard sends by the end. Some people really follow this, and head into the last thirty minutes with only four sends on their scorecard. I, on the other hand, had fifteen by that point. That is not bragging – it’s the result of not having any idea how I was going to perform. While I’ve been climbing a ton, I hadn’t been on a bouldering wall in four months and there’s definitely a different skill set than with roped climbing. So I started with the easy problems, and quickly realized I had underestimated what I should be climbing. I pushed a bit harder, and then a bit harder – it took a while to figure out exactly where my limit was. In the end I had 1910 points with three V3s and two V4s under my belt. All of my final five routes were harder than any bouldering problem I’d done before the competition – apparently roped climbing translates pretty well.

I was ecstatic for the rest of the event. I had far exceeded my expected score of ~700, averaging hard V3 rather than middling V1 – pushing past the performance anxiety that almost prevented me from entering in the first place. I was so excited, it was hard for me to sit still as we watched the dyno comp (I have no idea how some of those moves are possible) and pro finals (MetroRock’s own Francesca Metcalf kicked ass in the women’s final) – thankfully the free pizza and beer helped to quell my overflowing energy. The whole comp was a blast, and it was great to finally talk to a bunch of people whose faces were familiar to me from the gym.

Here’s hoping I’ve started to take some steps toward overcoming the debilitating fear I feel whenever people are watching me do something. I may never have to perform gymnastics with a crowd screaming at me as Francesca does, but hopefully some day I’ll be able to make it through a presentation without hoping that everyone is just staring at my slides while I hide behind the podium. In the meantime, I’m planning to enter MetroRock’s next competition on February 27. And now that I have some sense of my bouldering level, I can start working to bolster it – maybe even set a goal, like: I will climb a V5 at the February comp. Yeah, that sounds good. Let’s go with that.

I feel a bit more like diving into things that I might have avoided previously. It’s important for me to keep this momentum, rather than thinking “I’ll just take a month to relax after all that writing, then try something else.” To get this off on the right foot, I’m going to do a bouldering competition (this particular move is partially inspired by Adventuregrrl’s recent blog post). Next Saturday my local gym is hosting a Dark Horse Series comp, so I’ll sign up for that. I’m not sure what division I’d be in – maybe “recreational” – but it doesn’t matter, I’ll just try to climb, and it’ll help me fight my performance anxiety as well.

I’m going to link to the draft of my novel, but not before adding a disclaimer: This is a first draft. It’s an unfinished first draft. There are plot holes, discontinuities, poorly developed characters, loose ends, and premises that don’t hold up to scrutiny. I consider it rather embarrassing, but part of doing something is not burying it afterward. I plan to continue working on it, but other than maybe taking part in NaNoEdMo, I don’t have any real schedule.

I’ve put this off long enough, so … here’s Counting the Countless. I came up with the title on October 30, and ran from there.

[Update: In response to (completely valid) criticism, I’ve changed the font to Georgia.]

Thanks for your support.

All ratings are relative to the hardest rated gym. EG, if the hardest rated gym (which has rating \”0\”) rates a route a 5.7, a gym rated \”+2\” would likely call that same route a 5.9. Likewise, a 5.10b at the hardest gym would probably be a 5.10c at a gym rated \”+1\”.

With 40 people, the sitting-around-a-table-drinking-beer format is perhaps not the most effective. Sure, there is plenty of conversation to be a part of, but any single participant necessarily misses the majority of what\’s going on. So, I apologize at the beginning that this can not be a comprehensive report, but rather an experiential summary of what I observed that fateful evening.

I showed up at 18:00, with probably over twenty people bulging from a single long table. Almost everyone who came after me ended up filling a second table. I took note of a few big names right off the bat (from #lisp and elsewhere): Rahul Jain (who traveled from New York) had come with me, and certainly Faré (our great organizer) was already there. Jeremy Jones (a founder of Clozure) and James Knight (foom) were also there before me. Alistair Bridgewater (aka, nyef) trekked down from New Hampshire, but I think Hans Hübner won the longest-distance award, having come all the way from Berlin. Ok, this list is getting crazy … there were also other well-known lispers in attendance. Gary King was supposed to have been there, but I didn\’t see (or perhaps recognize) him. Both Zach Beane and dto had to miss because of transportation issues, which was quite disappointing.

I was afraid the group would be dominated by ITA employees, but I think they made up maybe a quarter of the entire group. None of the guys near me at the beginning were ITA employees, in fact, I think they were all Lisp hobbyists. As a result, there is always plenty of discussion about how to go about making Lisp your profession, which is a topic I do like to talk about. One of my favorite questions was \”If you get to write Lisp at work all day, do you work in other languages when you get home?\” The answer is pretty much \”no\” … at least, I don\’t play with other languages any more than I did before I was writing Lisp professionally.

Later on in the night I moved around the table to see what was happening at Faré\’s end. There seemed to be a lot of discussion about when meetings should be held, and how to organize them, etc., which is great to hear. We\’ll be moving to a more presentation-oriented format, and I\’m sure Faré will have all the details about future meetings sent around soon. There was an XO laptop that got passed around so everyone could enter in their contact information and how they would like to be involved with future mettings. So there ended up being a bit of discussion about the XOs, and who managed to get one (like me) and who didn\’t.

Toward the end of the night, I got around the table to talk with Rahul and another of my co-workers, and had the chance to finally meet Alistair. Unfortunately, I had to leave shortly after we began talking … and he will be farther away than NH for the next few months because of various contracts he\’s working on. Hopefully he\’ll come to meetings when he\’s back in the region.

I know … there\’s not much Lisp content in this post. Honestly, it\’s hard to remember exactly what was discussed. The meeting was great for getting to know more Lispers, and there was plenty of Lisp talk, but my focus at the time was more on having a good time (and some beers) with people that I have a lot in common with. There will be plenty of in-depth Lisp-hackery at future presentation-based meetings. For now I\’m just excited about there being so many people here who are interested in it.

Update: these changes (along with an additional one for unbound slots) are now available in the CCL repo: http://svn.clozure.com/publicsvn/openmcl/trunk/<os><arch>/ccl

When I read Geoff Wozniak’s post (I know, I\’m a week behind) I was disappointed to see Clozure CL wasn’t even taken into account. I decided to check it out for myself. Initially, I was a bit disappointed, but after only a couple minutes of hacking, I managed to improve the situation a bit.

¹ The existing code handled a defmethod followed by a defmethod with an incompatible lambda-list, but not a defmethod followed by a defgeneric with an incompatible lambda-list.

Initially (the black) we could claim superiority only to SBCL [Ed: just kidding, guys], but after my changes (in red) we’re now on par with Allegro. And Open Source. The squeaky wheel and all that. Thanks to Geoff for pointing out the issue.

Note: these changes currently exist only on my own box. I\’ll get them into CCL 1.2, though.

Next Monday (3 March 2008), is the inaugural Boston Lisp Meeting. Judging by talk around the office and in the community at large, it sounds like it\’ll be well-attended. If you know any lispers, send them along. If you want to get to know some, come along yourself.

I set up the auto-testing with darcs setpref test \"chmod +x test/run-tests; test/run-tests\". test/run-tests is the test script, but darcs doesn\’t allow you to add executable files to the repository, so you have to run chmod on the script before it can actually be executed.

Here\’s the test script itself:

states: undefined state `--language=html' %!PS-Adobe-3.0 %%BoundingBox: 24 24 571 818 %%Title: Enscript Output %%For: Greg Pfeil %%Creator: GNU enscript 1.6.4 %%CreationDate: Wed Mar 10 20:26:24 2010 %%Orientation: Portrait %%Pages: (atend) %%DocumentMedia: A4 595 842 0 () () %%DocumentNeededResources: (atend) %%EndComments %%BeginProlog %%BeginResource: procset Enscript-Prolog 1.6 4 % % Procedures. % /_S { % save current state /_s save def } def /_R { % restore from saved state _s restore } def /S { % showpage protecting gstate gsave showpage grestore } bind def /MF { % fontname newfontname -> - make a new encoded font /newfontname exch def /fontname exch def /fontdict fontname findfont def /newfont fontdict maxlength dict def fontdict { exch dup /FID eq { % skip FID pair pop pop } { % copy to the new font dictionary exch newfont 3 1 roll put } ifelse } forall newfont /FontName newfontname put % insert only valid encoding vectors encoding_vector length 256 eq { newfont /Encoding encoding_vector put } if newfontname newfont definefont pop } def /MF_PS { % fontname newfontname -> - make a new font preserving its enc /newfontname exch def /fontname exch def /fontdict fontname findfont def /newfont fontdict maxlength dict def fontdict { exch dup /FID eq { % skip FID pair pop pop } { % copy to the new font dictionary exch newfont 3 1 roll put } ifelse } forall newfont /FontName newfontname put newfontname newfont definefont pop } def /SF { % fontname width height -> - set a new font /height exch def /width exch def findfont [width 0 0 height 0 0] makefont setfont } def /SUF { % fontname width height -> - set a new user font /height exch def /width exch def /F-gs-user-font MF /F-gs-user-font width height SF } def /SUF_PS { % fontname width height -> - set a new user font preserving its enc /height exch def /width exch def /F-gs-user-font MF_PS /F-gs-user-font width height SF } def /M {moveto} bind def /s {show} bind def /Box { % x y w h -> - define box path /d_h exch def /d_w exch def /d_y exch def /d_x exch def d_x d_y moveto d_w 0 rlineto 0 d_h rlineto d_w neg 0 rlineto closepath } def /bgs { % x y height blskip gray str -> - show string with bg color /str exch def /gray exch def /blskip exch def /height exch def /y exch def /x exch def gsave x y blskip sub str stringwidth pop height Box gray setgray fill grestore x y M str s } def /bgcs { % x y height blskip red green blue str -> - show string with bg color /str exch def /blue exch def /green exch def /red exch def /blskip exch def /height exch def /y exch def /x exch def gsave x y blskip sub str stringwidth pop height Box red green blue setrgbcolor fill grestore x y M str s } def % Highlight bars. /highlight_bars { % nlines lineheight output_y_margin gray -> - gsave setgray /ymarg exch def /lineheight exch def /nlines exch def % This 2 is just a magic number to sync highlight lines to text. 0 d_header_y ymarg sub 2 sub translate /cw d_output_w cols div def /nrows d_output_h ymarg 2 mul sub lineheight div cvi def % for each column 0 1 cols 1 sub { cw mul /xp exch def % for each rows 0 1 nrows 1 sub { /rn exch def rn lineheight mul neg /yp exch def rn nlines idiv 2 mod 0 eq { % Draw highlight bar. 4 is just a magic indentation. xp 4 add yp cw 8 sub lineheight neg Box fill } if } for } for grestore } def % Line highlight bar. /line_highlight { % x y width height gray -> - gsave /gray exch def Box gray setgray fill grestore } def % Column separator lines. /column_lines { gsave .1 setlinewidth 0 d_footer_h translate /cw d_output_w cols div def 1 1 cols 1 sub { cw mul 0 moveto 0 d_output_h rlineto stroke } for grestore } def % Column borders. /column_borders { gsave .1 setlinewidth 0 d_footer_h moveto 0 d_output_h rlineto d_output_w 0 rlineto 0 d_output_h neg rlineto closepath stroke grestore } def % Do the actual underlay drawing /draw_underlay { ul_style 0 eq { ul_str true charpath stroke } { ul_str show } ifelse } def % Underlay /underlay { % - -> - gsave 0 d_page_h translate d_page_h neg d_page_w atan rotate ul_gray setgray ul_font setfont /dw d_page_h dup mul d_page_w dup mul add sqrt def ul_str stringwidth pop dw exch sub 2 div ul_h_ptsize -2 div moveto draw_underlay grestore } def /user_underlay { % - -> - gsave ul_x ul_y translate ul_angle rotate ul_gray setgray ul_font setfont 0 0 ul_h_ptsize 2 div sub moveto draw_underlay grestore } def % Page prefeed /page_prefeed { % bool -> - statusdict /prefeed known { statusdict exch /prefeed exch put } { pop } ifelse } def % Wrapped line markers /wrapped_line_mark { % x y charwith charheight type -> - /type exch def /h exch def /w exch def /y exch def /x exch def type 2 eq { % Black boxes (like TeX does) gsave 0 setlinewidth x w 4 div add y M 0 h rlineto w 2 div 0 rlineto 0 h neg rlineto closepath fill grestore } { type 3 eq { % Small arrows gsave .2 setlinewidth x w 2 div add y h 2 div add M w 4 div 0 rlineto x w 4 div add y lineto stroke x w 4 div add w 8 div add y h 4 div add M x w 4 div add y lineto w 4 div h 8 div rlineto stroke grestore } { % do nothing } ifelse } ifelse } def % EPSF import. /BeginEPSF { /b4_Inc_state save def % Save state for cleanup /dict_count countdictstack def % Count objects on dict stack /op_count count 1 sub def % Count objects on operand stack userdict begin /showpage { } def 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin 10 setmiterlimit [ ] 0 setdash newpath /languagelevel where { pop languagelevel 1 ne { false setstrokeadjust false setoverprint } if } if } bind def /EndEPSF { count op_count sub { pos } repeat % Clean up stacks countdictstack dict_count sub { end } repeat b4_Inc_state restore } bind def % Check PostScript language level. /languagelevel where { pop /gs_languagelevel languagelevel def } { /gs_languagelevel 1 def } ifelse %%EndResource %%BeginResource: procset Enscript-Encoding-88591 1.6 4 /encoding_vector [ /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /tilde /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /space /exclamdown /cent /sterling /currency /yen /brokenbar /section /dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /bullet /cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla /egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis ] def %%EndResource %%EndProlog %%BeginSetup %%IncludeResource: font Courier-Bold %%IncludeResource: font Courier /HFpt_w 10 def /HFpt_h 10 def /Courier-Bold /HF-gs-font MF /HF /HF-gs-font findfont [HFpt_w 0 0 HFpt_h 0 0] makefont def /Courier /F-gs-font MF /F-gs-font 10 10 SF /#copies 1 def % Pagedevice definitions: gs_languagelevel 1 gt { < < /PageSize [595 842] >> setpagedevice } if %%BeginResource: procset Enscript-Header-simple 1.6 4 /do_header { % print default simple header gsave d_header_x d_header_y HFpt_h 3 div add translate HF setfont user_header_p { 5 0 moveto user_header_left_str show d_header_w user_header_center_str stringwidth pop sub 2 div 0 moveto user_header_center_str show d_header_w user_header_right_str stringwidth pop sub 5 sub 0 moveto user_header_right_str show } { 5 0 moveto fname show 45 0 rmoveto fmodstr show 45 0 rmoveto pagenumstr show } ifelse grestore } def %%EndResource /d_page_w 547 def /d_page_h 794 def /d_header_x 0 def /d_header_y 779 def /d_header_w 547 def /d_header_h 15 def /d_footer_x 0 def /d_footer_y 0 def /d_footer_w 547 def /d_footer_h 0 def /d_output_w 547 def /d_output_h 779 def /cols 1 def %%EndSetup %%Trailer %%Pages: 0 %%DocumentNeededResources: font Courier-Bold Courier %%EOF

What it should be doing is running the tests, and returning non-zero on failure. It runs the tests, but the failure bit isn\’t exactly happening yet.

I figured I\’d throw this out there and see if anyone else has a decent way of getting automated testing happening. The more I try to bridge between Lisp and Unix, the more I just want to live in a Lisp REPL.

Please help make a difference by donating to support research toward treatment and a cure.