<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div>I think this precisely that is happening. Now, with calling OBJC:REMOVE-LISP-SLOTS from #/alloc the problem appears to have gone away.</div><div><br></div><div>thanks!</div><div><br></div><div>Alex</div><div><br></div><br><div><div>On Feb 15, 2012, at 5:23 PM, Gary Byers wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div>A CCL::SLOT-VECTOR's 0th element is a backpointer to the containing<br>instance; the values of the instance's slots are in elements 1..n.<br>There's nothing anomalous about trying to access element 2 of a slot<br>vector associated with an instance that has 2 lisp instance slots; the<br>anomaly is that a SLOT-VECTOR that apparently only has one slot is<br>associated with an instance that has two slots.<br><br>There's a hash table that maps instances of ObjC classes that're<br>defined to have lisp slots to the SLOT-VECTOR that contains the<br>instance's slot valiues. That's an oversimplification: the hash table<br>really maps foreign addresses to slot vectors. The mapping ceases to<br>become valid when the ObjC object at a particular address is<br>deallocated. In order to ensure that the mapping is broken when the<br>instance is (about to be) deallocated. Whenever a class that's<br>defined to have lisp slots associated with its instances is defined, a<br>#/dealloc method is automatically defined which calls OBJC:REMOVE-LISP-SLOTS<br>to break the mapping (and calls the next method to ultimately cause the<br>ObjC object to be deallocated.)<br><br>You can redefine this automatically-generated #/dealloc method, but it's<br>critical that the redefinition calls OBJC:REMOVE-LISP-SLOTS if the class<br>in question has lisp slots.<br><br>Since an ObjC instance can be created by foreign code (by an #/init method or<br>equivalent), slot-vectors can be created on-demand (when they're first accessed.)<br>The code that tries to access the slot-vector associated with an ObjC instance<br>either looks in the hash table to see if a mapping already exists between the<br>instance (actually, its address) and a slot vector and either uses an existing<br>mapping or establishes a new one.<br><br>If a #/dealloc method is defined on instances of classes that have lisp slots<br>and the method neglects to call OBJC:REMOVE-LISP-SLOTS, then a scenario like<br>the following can occur:<br><br>1) An instance of some ObjC class for which one lisp slot is defined<br>is created (at some foreign address A). A slot-vector for the<br>instance is created and associated with address A.<br><br>2) The instance is deallocated but the mapping between A and the slot-vector<br>remains.<br><br>3) At some later point, an instance of some (quite possibly different) ObjC<br>class is created and happens to also have the foreign address A. When the<br>instance's slot-vector needs to be (lazily) accessed, the old (deallocated)<br>instance's slot-slot vector is (re-)used, and wackiness ensues. (We could<br>refuse to reuse a slot-vector of the wrong size and avoid the particular<br>problem that you're seeing, but that'd just allow other (possibly much more<br>subtle) kinds of wackiness to occur.<br><br>You're right in remembering that this used to be more common; the<br>workaround (of automatically defining #/dealloc methods) was<br>introduced in 1.6, and the issue (where user-defined #/dealloc methods<br>have to call OBJC:REMOVE-LISP-SLOTS) is discussed in the 1.6 release<br>notes.<br><br>What I'm calling "lisp slots" (slots associated with instances of ObjC classes<br>where the slot-definition clauses don't have a :FOREIGN-TYPE option) are fairly<br>expensive, and it's generally preferable and not a whole lot different to use<br>the :FOREIGN-TYPE option when that's applicable (as I'd guess it is in your<br>example.)<br><br>I have no way of knowing for sure, but I think it's likely that this is what<br>you're running into.<br><br>On Wed, 15 Feb 2012, Alexander Repenning wrote:<br><br><blockquote type="cite">Very strange and super hard to reproduce slot access error with ns:+ns-object objects happening on CCL Windows with Cocotron (Version 1.7-dev (WindowsX8632)!)<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">This is the class definition:<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(defclass NATIVE-COLOR-WELL-BUTTON (ns:ns-button)<br></blockquote><blockquote type="cite">((lui-view :accessor lui-view :initarg :lui-view)<br></blockquote><blockquote type="cite">(native-color :accessor native-color :initform nil :initarg :native-color))<br></blockquote><blockquote type="cite">(:metaclass ns:+ns-object))<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">works fine 99% of the time when accessing NATIVE-COLOR but then, once in a while we get the error below. Assuming the slots of NATIVE-COLOR-WELL-BUTTON would be index 0 and 1 then CCL tries to access, occasionally, native-color as slot index 2. How can the slot access fail sometimes. What could the source of non deterministic behavior be? I think I remember some similar problem with some CCL window function a long time ago. That got fixed but how? I assume that threading may be involved in the problem. Any ideas?<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">best, Alex<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">Error: Array index 2 out of bounds for #<SLOT-VECTOR #xCBE4176> .<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">While executing: (:INTERNAL LUI::|-[NativeColorWellButton drawRect:]|), in pro<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">cess Initial(0).<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">Type :POP to abort, :R for a list of available restarts.<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">Type :? for other options.<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">1 > :b<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(24078C0) : 0 (FUNCALL #'#<(:INTERNAL LUI::|-[NativeColorWellButton drawRect:]|<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">)> #<SIMPLE-ERROR #xCC4B6EE>) 143<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(24078D4) : 1 (SIGNAL #<SIMPLE-ERROR #xCC4B6EE>) 879<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(24078FC) : 2 (%ERROR #<SIMPLE-ERROR #xCC4B6EE> (2 #<SLOT-VECTOR #xCBE4176>) 94<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">44976) 111<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407910) : 3 (FUNCALL #'#<(:INTERNAL CCL::%XERR-DISP)>) 2351<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407938) : 4 (FUNCALL-WITH-ERROR-REENTRY-DETECTION #<CCL:COMPILED-LEXICAL-CLOS<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">URE (:INTERNAL CCL::%XERR-DISP) #x51F74E>) 183<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407958) : 5 (FUNCALL #'#<CCL::%XERR-DISP> 899610) 471<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407978) : 6 (%PASCAL-FUNCTIONS% 2 899610) 343<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">*(24079C0) : 7 (%STD-SLOT-VECTOR-VALUE #<SLOT-VECTOR #xCBE4176> #<STANDARD-EFFEC<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">TIVE-SLOT-DEFINITION for instance slot LUI::NATIVE-COLOR #x844E69E>) 288<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(24079F4) : 8 (FUNCALL #'#<LUI::|-[NativeColorWellButton drawRect:]|> 900310) 4<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">119<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407A2C) : 9 (%PASCAL-FUNCTIONS% 413 900310) 343<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407A74) : 10 (FUNCALL #'#<Anonymous Function #x4DC62D6> #<MENULESS-NATIVE-WIN<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">DOW <MenulessNativeWindow 0x4b0806d0> (#x4B0806D0)> #S(CCL::OBJC-SELECTOR :NAME<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">"orderFront:" :%SEL #<A Foreign Pointer #x2AD5E74>) NIL) 407<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407A88) : 11 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|orderFront:|)><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">???) 975<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407AC0) : 12 (FUNCALL #'#<(:INTERNAL #:G49563 (SHOW (WINDOW)))>) 79<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407AD4) : 13 (HANDLE-INVOKING-LISP-FUNCTION #<CCL:COMPILED-LEXICAL-CLOSURE (:<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">INTERNAL #:G49563 #) #xCC4B76E> NIL NIL #<APPKIT-PROCESS Initial(0) [Reset] #xC0<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">5E94E>) 567<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407B0C) : 14 (FUNCALL #'#<#<STANDARD-METHOD SHOW (WINDOW)>> <inflatable-icon-<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">editor-window x="100" y="138" width="1020" height="400"/>) 287<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407B24) : 15 (FUNCALL #'#<#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER (APPLI<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">CATION-WINDOW)>> <inflatable-icon-editor-window x="100" y="138" width="1020" hei<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ght="400"/> :IS-CREATED-BY-XML-READER T :FILE #P"C:/Program Files (x86)/AgentShe<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ets INC/AgentCubesb3rc1/AgentCubes.app/Contents/resources/windows/inflatable-ico<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">n-editor-windows.window" :TRACK-MOUSE T :RESIZABLE T :MIN-WIDTH 50 :MIN-HEIGHT 5<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">0 :DO-SHOW-IMMEDIATELY T :X 100 :Y 100 :WIDTH 340 :HEIGHT 180) 295<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407B38) : 16 (%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE (NIL #<STANDARD-METHOD<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">INITIALIZE-INSTANCE :AFTER #> . 9445096)) 1207<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407B78) : 17 (%%STANDARD-COMBINED-METHOD-DCODE (NIL (#<#> #<#> #<#>) #<STANDA<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">RD-METHOD INITIALIZE-INSTANCE #> #<STANDARD-METHOD INITIALIZE-INSTANCE #> #<CCL:<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">:STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE #>) 9445096) 207<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C00) : 18 (%MAKE-STD-INSTANCE #<STANDARD-CLASS INFLATABLE-ICON-EDITOR-WIND<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">OW> (:IS-CREATED-BY-XML-READER T :FILE #P"C:/Program Files (x86)/AgentSheets INC<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">/AgentCubesb3rc1/AgentCubes.app/Contents/resources/windows/inflatable-icon-edito<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">r-windows.window" :TRACK-MOUSE ...)) 359<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C14) : 19 (FUNCALL #'#<#<CCL::STANDARD-KERNEL-METHOD MAKE-INSTANCE (STANDA<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">RD-CLASS)>> #<STANDARD-CLASS INFLATABLE-ICON-EDITOR-WINDOW> :IS-CREATED-BY-XML-R<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">EADER T :FILE #P"C:/Program Files (x86)/AgentSheets INC/AgentCubesb3rc1/AgentCub<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">es.app/Contents/resources/windows/inflatable-icon-editor-windows.window") 135<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C28) : 20 (FUNCALL #'#<#<CCL::STANDARD-KERNEL-METHOD MAKE-INSTANCE (SYMBOL<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">)>> INFLATABLE-ICON-EDITOR-WINDOW :IS-CREATED-BY-XML-READER T :FILE #P"C:/Progra<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">m Files (x86)/AgentSheets INC/AgentCubesb3rc1/AgentCubes.app/Contents/resources/<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">windows/inflatable-icon-editor-windows.window") 183<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C3C) : 21 (READ-NAME-AND-MAKE-INSTANCE #<BASIC-FILE-CHARACTER-INPUT-STREAM<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">("lui:resources;windows;inflatable-icon-editor-windows.window"/3172 ISO-8859-1)<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">#xCC2D226>) 535<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C58) : 22 (ELEMENT-READER #<BASIC-FILE-CHARACTER-INPUT-STREAM ("lui:resour<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ces;windows;inflatable-icon-editor-windows.window"/3172 ISO-8859-1) #xCC2D226> #<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">\<) 375<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407C78) : 23 (%PARSE-EXPRESSION #<BASIC-FILE-CHARACTER-INPUT-STREAM ("lui:res<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ources;windows;inflatable-icon-editor-windows.window"/3172 ISO-8859-1) #xCC2D226<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">#\< NIL) 551<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407CA4) : 24 (%READ-FORM #<BASIC-FILE-CHARACTER-INPUT-STREAM ("lui:resources;<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">windows;inflatable-icon-editor-windows.window"/3172 ISO-8859-1) #xCC2D226> 0 NIL<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">) 543<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407CC0) : 25 (READ-INTERNAL #<BASIC-FILE-CHARACTER-INPUT-STREAM ("lui:resourc<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">es;windows;inflatable-icon-editor-windows.window"/3172 ISO-8859-1) #xCC2D226> T<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">NIL NIL) 247<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407CFC) : 26 (READ #<BASIC-FILE-CHARACTER-INPUT-STREAM ("lui:resources;window<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">s;inflatable-icon-editor-windows.window"/3172 ISO-8859-1) #xCC2D226> T NIL NIL)<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">143<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407D24) : 27 (LOAD-OBJECT "lui:resources;windows;inflatable-icon-editor-windo<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ws.window" :VERBOSE NIL :IF-DOES-NOT-EXIST :ERROR :PACKAGE #<Package "XLUI">) 43<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">9<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407D88) : 28 (NEW-INFLATABLE-ICON-EDITOR-WINDOW-FROM-IMAGE "C:/Users/AgentCub<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">esTester/Desktop/Maze Craze/agents/Chaser/shapes/Chaser/redLobster.png" :SAVE-BU<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">TTON-CLOSURE-ACTION #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL #) #xCC2D246> :SHA<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">PE-NAME "CHASER" :SHAPE-FILENAME "index" :DESTINATION-INFLATABLE-ICON NIL :CLOSE<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">-ACTION NIL :ALERT-CLOSE-ACTION ICON-WINDOW-HAS-CLOSED :ALERT-CLOSE-TARGET <agen<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">t-gallery width="170" height="150"/>) 295<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407DE4) : 29 (FUNCALL #'#<#<STANDARD-METHOD EDIT-GROUP-ITEM (AGENT-GALLERY-VI<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">EW T T)>> <agent-gallery width="170" height="150"/> "Chaser" "Chaser") 1231<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407E08) : 30 (FUNCALL #'#<LUI::|-[GroupDetectionView mouseDown:]|> 900882) 98<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">3<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407E3C) : 31 (%PASCAL-FUNCTIONS% 466 900882) 343<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407E84) : 32 (FUNCALL #'#<Anonymous Function #x4DC64DE> #<A Foreign Pointer [<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">stack-allocated] (:* #) #x36FD30> #<A Foreign Pointer #x2AA8974> #<NS-EVENT <NSE<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">vent_mouse[0x45c04420] type: 1> (#x45C04420)>) 383<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407E98) : 33 (%CALL-NEXT-OBJC-METHOD #<LISP-APPLICATION <LispApplication 0x02<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">db3250> (#x2DB3250)> #<OBJC:OBJC-CLASS GUI::LISP-APPLICATION (#x54F550)> #<A For<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">eign Pointer #x2AA8974> (:VOID :ID) #<NS-EVENT <NSEvent_mouse[0x45c04420] type:<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">1> (#x45C04420)>) 1239<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407EE8) : 34 (FUNCALL #'#<GUI::|-[LispApplication sendEvent:]|> 900974) 879<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407F20) : 35 (%PASCAL-FUNCTIONS% 16 900974) 343<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407F68) : 36 (FUNCALL #'#<Anonymous Function #x4D409FE> #<LISP-APPLICATION <L<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ispApplication 0x02db3250> (#x2DB3250)> #S(CCL::OBJC-SELECTOR :NAME "run" :%SEL<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">#<A Foreign Pointer #x286D479>)) 191<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407F78) : 37 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|run|)> ???) 975<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407FB0) : 38 (EVENT-LOOP NIL) 367<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">(2407FD8) : 39 (FUNCALL #'#<(:INTERNAL GUI::COCOA-STARTUP GUI::START-COCOA-APPL<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">ICATION)>) 783<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">1 ><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">Prof. Alexander Repenning<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">University of Colorado<br></blockquote><blockquote type="cite">Computer Science Department<br></blockquote><blockquote type="cite">Boulder, CO 80309-430<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">vCard: <a href="http://www.cs.colorado.edu/~ralex/AlexanderRepenning.vcf">http://www.cs.colorado.edu/~ralex/AlexanderRepenning.vcf</a><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">_______________________________________________<br></blockquote><blockquote type="cite">Openmcl-devel mailing list<br></blockquote><blockquote type="cite"><a href="mailto:Openmcl-devel@clozure.com">Openmcl-devel@clozure.com</a><br></blockquote><blockquote type="cite"><a href="http://clozure.com/mailman/listinfo/openmcl-devel">http://clozure.com/mailman/listinfo/openmcl-devel</a><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote></div></blockquote></div><br><div>
<span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><p style="margin: 0.0px 0.0px 0.0px 0.0px"><font face="Helvetica" size="3" style="font: 12.0px Helvetica">Prof. Alexander Repenning</font></p><p style="margin: 0.0px 0.0px 0.0px 0.0px"><br class="khtml-block-placeholder"></p><p style="margin: 0.0px 0.0px 0.0px 0.0px">University of Colorado</p><p style="margin: 0.0px 0.0px 0.0px 0.0px">Computer Science Department</p><p style="margin: 0.0px 0.0px 0.0px 0.0px">Boulder, CO 80309-430</p><p style="margin: 0.0px 0.0px 0.0px 0.0px"><br class="khtml-block-placeholder"></p><p style="margin: 0.0px 0.0px 0.0px 0.0px"><font face="Helvetica" size="3" style="font: 12.0px Helvetica">vCard: <a href="http://www.cs.colorado.edu/~ralex/AlexanderRepenning.vcf">http://www.cs.colorado.edu/~ralex/AlexanderRepenning.vcf</a></font></p><br class="Apple-interchange-newline"></span></span></span></span>
</div>
<br></body></html>