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

Kristian Bredin kristiandevel at gmail.com
Thu Nov 12 07:16:56 PST 2009


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 >



More information about the Openmcl-devel mailing list