[Openmcl-devel] Error while opening files in the IDE

Gail Zacharias gz at clozure.com
Thu Nov 12 09:08:11 PST 2009


Sorry about that.  Should be fixed in r13194.

On Thu, Nov 12, 2009 at 10:16 AM, Kristian Bredin
<kristiandevel at gmail.com> wrote:
> Hi all!
>
> I did an update (via svn) to 1.5-dev-r13192M-trunk, and now I
> oftentimes get an error after opening a source file (both by double-
> clicking on a file in the Finder as well as via the Open... menu item
> in the IDE).
>
> I have never seen this before, but it's been a while since I did an
> update. Something appears to have been introduced somewhere between
> 1.4-dev-r13099M-trunk and 1.5-dev-r13192M-trunk, which causes these
> problems for me, because in 1.4-dev-r13099M-trunk and before, opening
> files works fine.
>
> I made a clean installation of ccl:
> 1) I manually deleted the ccl folder (in my home folder)
> 2) Then I did:
> svn co http://svn.clozure.com/publicsvn/openmcl/trunk/darwinppc/ccl
> 3) Then (rebuild-ccl :full t)
> 4) Then (require 'cocoa-application)
>
> Everything compiles fine, but when I try to open a file the
> AltConsole pops up with the following message:
>
>  > Error: value #<A Dead Mac Pointer> is not of the expected type (OR
> MACPTR NULL).
>  > While executing: (:INTERNAL GUI::|-[HemlockTextstorageTextView
> updateSelection:length:affinity:]|), in process Initial(0).
>  > Type :POP to abort, :R for a list of available restarts.
>  > Type :? for other options.
> 1 >
>
> So I'm stuck there.
>
> Both 32 and 64-bit versions of ccl behave the same on a Macbook Pro
> with Leopard, as well as a 32-bit version on a MDD with Tiger. And
> 1.4-dev-r13099M-trunk works without problems in this respect on both
> machines.
>
> Below are two backtraces: Backtrace-1: After double-clicking on the
> file: /examples/cocoa/easygui.lisp, and Backtrace-2: After double-
> clicking on the file: /contrib/baylis/ca-demo.lisp. Both are in 32-
> bit ccl on a MacBook Pro with Leopard.
>
> Any pointers are welcome!
>
> Kristian
>
>
> ------------------------------------------------------------------------
> --------
> Backtrace-1:
>
>
>  > Error: value #<A Dead Mac Pointer> is not of the expected type (OR
> MACPTR NULL).
>  > While executing: (:INTERNAL GUI::|-[HemlockTextstorageTextView
> updateSelection:length:affinity:]|), in process Initial(0).
>  > Type :POP to abort, :R for a list of available restarts.
>  > Type :? for other options.
> 1 > :B
>  (342B24) : 0 (FUNCALL #'#<(:INTERNAL GUI::|-
> [HemlockTextstorageTextView updateSelection:length:affinity:]|)>
> #<TYPE-ERROR #x97575B6>) 151
>  (342B38) : 1 (SIGNAL #<TYPE-ERROR #x97575B6>) 903
>  (342B60) : 2 (%ERROR #<TYPE-ERROR #x97575B6> NIL 854749) 119
>  (342B74) : 3 (%COERCE-TO-ADDRESS #<A Dead Mac Pointer>) 159
>  (342B84) : 4 (FUNCALL #'#<Anonymous Function #x8C9964E> #<OBJC:OBJC-
> CLASS NS:NS-DICTIONARY (#xA014FA40)> #S(CCL::OBJC-SELECTOR :NAME
> "dictionaryWithObject:forKey:" :%SEL #<A Foreign Pointer #x91236C74>)
> #<A Dead Mac Pointer> #<NS-MUTABLE-STRING "NSColor" (#xA00940E4)>) 223
>  (342BA0) : 5 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|
> dictionaryWithObject:forKey:|)> ???) 983
>  (342BD8) : 6 (SET-TEMPORARY-CHARACTER-ATTRIBUTES #<NS-LAYOUT-
> MANAGER <NSLayoutManager: 0x1c72c0>
>     1 containers, text backing has 208 characters
>     selected character range {0, 0} affinity: upstream granularity:
> character
>     marked character range {208, 0}
>     Currently holding 208 glyphs.
>     Glyph tree contents:  208 characters, 208 glyphs, 1 nodes, 32
> node bytes, 256 storage bytes, 288 total bytes, 1.38 bytes per
> character, 1.38 bytes per glyph
>     Layout tree contents:  208 characters, 208 glyphs, 208 laid
> glyphs, 8 laid line fragments, 1 nodes, 32 node bytes, 792 storage
> bytes, 824 total bytes, 3.96 bytes per character, 3.96 bytes per
> glyph, 26.00 laid glyphs per laid line fragment, 103.00 bytes per
> laid line fragment
>  (#x1C72C0)> 0 #<Hemlock Line "(in-package :cl-user)"> NIL) 1391
>  (342C3C) : 7 (FUNCALL #'#<#<STANDARD-METHOD GUI::COMPUTE-TEMPORARY-
> ATTRIBUTES (GUI::HEMLOCK-TEXTSTORAGE-TEXT-VIEW)>> #<HEMLOCK-TEXT-VIEW
> <HemlockTextView: 0x37ce000>
>     Frame = {{0.00, 0.00}, {585.00, 336.00}}, Bounds = {{0.00,
> 0.00}, {585.00, 336.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {585.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CE000)>) 1703
>  (342C8C) : 8 (FUNCALL #'#<#<STANDARD-METHOD GUI::UPDATE-PAREN-
> HIGHLIGHT (GUI::HEMLOCK-TEXTSTORAGE-TEXT-VIEW)>> #<HEMLOCK-TEXT-VIEW
> <HemlockTextView: 0x37ce000>
>     Frame = {{0.00, 0.00}, {585.00, 336.00}}, Bounds = {{0.00,
> 0.00}, {585.00, 336.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {585.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CE000)>) 1119
>  (342CB0) : 9 (FUNCALL #'#<GUI::|-[HemlockTextstorageTextView
> updateSelection:length:affinity:]|> -268436694) 823
>  (342CEC) : 10 (%PASCAL-FUNCTIONS% 77 -268436694) 343
>  (342D34) : 11 (FUNCALL #'#<Anonymous Function #x93F9BE6> #<HEMLOCK-
> TEXT-VIEW <HemlockTextView: 0x37ce000>
>     Frame = {{0.00, 0.00}, {585.00, 336.00}}, Bounds = {{0.00,
> 0.00}, {585.00, 336.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {585.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CE000)> #S(CCL::OBJC-SELECTOR :NAME
> "updateSelection:length:affinity:" :%SEL #<A Foreign Pointer
> #x121060>) 0 0 0) 375
>  (342D50) : 12 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|
> updateSelection:length:affinity:|)> ???) 983
>  (342D88) : 13 (FOR-EACH-TEXTVIEW-USING-STORAGE #<HEMLOCK-TEXT-
> STORAGE HemlockTextStorage : string <HemlockBufferString for
> #<Hemlock Buffer "easygui.lisp /Users/carinalindblad/ccl/examples/
> cocoa/">> (#x880200)> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #)
> #x9757D96>) 367
>  (342DBC) : 14 (INVOKE-MODIFYING-BUFFER-STORAGE #<Hemlock Buffer
> "easygui.lisp /Users/carinalindblad/ccl/examples/cocoa/"> #<COMPILED-
> LEXICAL-CLOSURE (:INTERNAL #) #x9757F4E>) 263
>  (342DE0) : 15 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-
> EVENT (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #x975866E> #<Compiled-
> function (:INTERNAL GUI::|-[HemlockEditorDocument
> makeWindowControllers]|) (Non-Global)  #x944685E>) 783
>  (342E34) : 16 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD HI::HANDLE-
> HEMLOCK-EVENT #> . 854969)) 1055
>  (342E7C) : 17 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-
> EVENT :AROUND (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #x975866E>
> #<Compiled-function (:INTERNAL GUI::|-[HemlockEditorDocument
> makeWindowControllers]|) (Non-Global)  #x944685E>) 175
>  (342EB0) : 18 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD
> HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-
> HEMLOCK-EVENT #>) 854969) 679
>  (342EF0) : 19 (FUNCALL #'#<GUI::|-[HemlockEditorDocument
> makeWindowControllers]|> -268436634) 2351
>  (342F38) : 20 (%PASCAL-FUNCTIONS% 118 -268436634) 343
>  (342F80) : 21 (FUNCALL #'#<Anonymous Function #x8CA590E> #<LISP-
> APPLICATION <LispApplication: 0x812600> (#x812600)> #S(CCL::OBJC-
> SELECTOR :NAME "run" :%SEL #<A Foreign Pointer #x912D7A24>)) 199
>  (342F90) : 22 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|run|)
>  > ???) 983
>  (342FC8) : 23 (EVENT-LOOP NIL) 383
> 1 >
> -----------------------------------------------------------------------
> Backtrace-2:
>
>
>  > Error: value #<A Dead Mac Pointer> is not of the expected type (OR
> MACPTR NULL).
>  > While executing: (:INTERNAL GUI::|-[HemlockTextstorageTextView
> updateSelection:length:affinity:]|), in process Initial(0).
>  > Type :POP to abort, :R for a list of available restarts.
>  > Type :? for other options.
> 1 > :B
>  (342B24) : 0 (FUNCALL #'#<(:INTERNAL GUI::|-
> [HemlockTextstorageTextView updateSelection:length:affinity:]|)>
> #<TYPE-ERROR #x9766716>) 151
>  (342B38) : 1 (SIGNAL #<TYPE-ERROR #x9766716>) 903
>  (342B60) : 2 (%ERROR #<TYPE-ERROR #x9766716> NIL 854749) 119
>  (342B74) : 3 (%COERCE-TO-ADDRESS #<A Dead Mac Pointer>) 159
>  (342B84) : 4 (FUNCALL #'#<Anonymous Function #x8C9964E> #<OBJC:OBJC-
> CLASS NS:NS-DICTIONARY (#xA014FA40)> #S(CCL::OBJC-SELECTOR :NAME
> "dictionaryWithObject:forKey:" :%SEL #<A Foreign Pointer #x91236C74>)
> #<A Dead Mac Pointer> #<NS-MUTABLE-STRING "NSColor" (#xA00940E4)>) 223
>  (342BA0) : 5 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|
> dictionaryWithObject:forKey:|)> ???) 983
>  (342BD8) : 6 (SET-TEMPORARY-CHARACTER-ATTRIBUTES #<NS-LAYOUT-
> MANAGER <NSLayoutManager: 0x1c70a0>
>     1 containers, text backing has 4498 characters
>     selected character range {0, 0} affinity: upstream granularity:
> character
>     marked character range {4498, 0}
>     Currently holding 4498 glyphs.
>     Glyph tree contents:  4498 characters, 4498 glyphs, 1 nodes, 32
> node bytes, 8192 storage bytes, 8224 total bytes, 1.83 bytes per
> character, 1.83 bytes per glyph
>     Layout tree contents:  4498 characters, 4498 glyphs, 808 laid
> glyphs, 29 laid line fragments, 3 nodes, 96 node bytes, 1944 storage
> bytes, 2040 total bytes, 0.45 bytes per character, 0.45 bytes per
> glyph, 27.86 laid glyphs per laid line fragment, 70.34 bytes per laid
> line fragment
>  (#x1C70A0)> 0 #<Hemlock Line ";;"> #<Hemlock Line "          #
> $NSClosableWindowMask">) 1391
>  (342C3C) : 7 (FUNCALL #'#<#<STANDARD-METHOD GUI::COMPUTE-TEMPORARY-
> ATTRIBUTES (GUI::HEMLOCK-TEXTSTORAGE-TEXT-VIEW)>> #<HEMLOCK-TEXT-VIEW
> <HemlockTextView: 0x37cd000>
>     Frame = {{0.00, 0.00}, {570.00, 348.00}}, Bounds = {{0.00,
> 0.00}, {570.00, 348.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {570.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CD000)>) 1703
>  (342C8C) : 8 (FUNCALL #'#<#<STANDARD-METHOD GUI::UPDATE-PAREN-
> HIGHLIGHT (GUI::HEMLOCK-TEXTSTORAGE-TEXT-VIEW)>> #<HEMLOCK-TEXT-VIEW
> <HemlockTextView: 0x37cd000>
>     Frame = {{0.00, 0.00}, {570.00, 348.00}}, Bounds = {{0.00,
> 0.00}, {570.00, 348.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {570.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CD000)>) 1119
>  (342CB0) : 9 (FUNCALL #'#<GUI::|-[HemlockTextstorageTextView
> updateSelection:length:affinity:]|> -268436694) 823
>  (342CEC) : 10 (%PASCAL-FUNCTIONS% 77 -268436694) 343
>  (342D34) : 11 (FUNCALL #'#<Anonymous Function #x93F9BE6> #<HEMLOCK-
> TEXT-VIEW <HemlockTextView: 0x37cd000>
>     Frame = {{0.00, 0.00}, {570.00, 348.00}}, Bounds = {{0.00,
> 0.00}, {570.00, 348.00}}
>     Horizontally resizable: YES, Vertically resizable: YES
>     MinSize = {570.00, 336.00}, MaxSize = {10000000.00, 10000000.00}
>  (#x37CD000)> #S(CCL::OBJC-SELECTOR :NAME
> "updateSelection:length:affinity:" :%SEL #<A Foreign Pointer
> #x121060>) 0 0 0) 375
>  (342D50) : 12 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|
> updateSelection:length:affinity:|)> ???) 983
>  (342D88) : 13 (FOR-EACH-TEXTVIEW-USING-STORAGE #<HEMLOCK-TEXT-
> STORAGE HemlockTextStorage : string <HemlockBufferString for
> #<Hemlock Buffer "ca-demo.lisp /Users/carinalindblad/ccl/contrib/
> baylis/">> (#x880600)> #<COMPILED-LEXICAL-CLOSURE (:INTERNAL #)
> #x976C876>) 367
>  (342DBC) : 14 (INVOKE-MODIFYING-BUFFER-STORAGE #<Hemlock Buffer "ca-
> demo.lisp /Users/carinalindblad/ccl/contrib/baylis/"> #<COMPILED-
> LEXICAL-CLOSURE (:INTERNAL #) #x976CA2E>) 263
>  (342DE0) : 15 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-
> EVENT (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #x976D14E> #<Compiled-
> function (:INTERNAL GUI::|-[HemlockEditorDocument
> makeWindowControllers]|) (Non-Global)  #x944685E>) 783
>  (342E34) : 16 (%CALL-NEXT-METHOD (NIL #<STANDARD-METHOD HI::HANDLE-
> HEMLOCK-EVENT #> . 854969)) 1055
>  (342E7C) : 17 (FUNCALL #'#<#<STANDARD-METHOD HI::HANDLE-HEMLOCK-
> EVENT :AROUND (HI:HEMLOCK-VIEW T)>> #<HI:HEMLOCK-VIEW #x976D14E>
> #<Compiled-function (:INTERNAL GUI::|-[HemlockEditorDocument
> makeWindowControllers]|) (Non-Global)  #x944685E>) 175
>  (342EB0) : 18 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD
> HI::HANDLE-HEMLOCK-EVENT :AROUND #> #<STANDARD-METHOD HI::HANDLE-
> HEMLOCK-EVENT #>) 854969) 679
>  (342EF0) : 19 (FUNCALL #'#<GUI::|-[HemlockEditorDocument
> makeWindowControllers]|> -268436634) 2351
>  (342F38) : 20 (%PASCAL-FUNCTIONS% 118 -268436634) 343
>  (342F80) : 21 (FUNCALL #'#<Anonymous Function #x8CA590E> #<LISP-
> APPLICATION <LispApplication: 0x812600> (#x812600)> #S(CCL::OBJC-
> SELECTOR :NAME "run" :%SEL #<A Foreign Pointer #x912D7A24>)) 199
>  (342F90) : 22 (FUNCALL #'#<(:OBJC-DISPATCH NEXTSTEP-FUNCTIONS:|run|)
>  > ???) 983
>  (342FC8) : 23 (EVENT-LOOP NIL) 383
> 1 >
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>



More information about the Openmcl-devel mailing list