Index: environment/framework/error-handling.dylan
===================================================================
--- environment/framework/error-handling.dylan	(revision 11650)
+++ environment/framework/error-handling.dylan	(working copy)
@@ -63,10 +63,10 @@
          "Please close any unused projects or applications.",
 	 product-name);
   let owner = current-frame();
-  apply(notify-user, message,
-	title: product-name,
-	style: #"error",
-	owner: if (owner & frame-mapped?(owner)) owner end)
+  notify-user(message,
+              title: product-name,
+              style: #"error",
+              owner: if (owner & frame-mapped?(owner)) owner end)
 end method do-environment-handler;


While building win32-environment...

C:\open-dylan-1.0b5rc2\bin>batch-debug win32-environment
batch-debug win32-environment


;;; Condition: Object #f cannot be converted to class {<class>: <simple-object-vector>}.


;;; -------------- Report for signalling Dylan Thread "Building for {class <project-browser>} Thread 2"--------------

#1 DXDYLAN!primitive_invoke_debugger
  [Foreign Call Frame 0x2321DDA8:0x66E6790D]
  {Unknown source location}

#2 DXDYLAN!invoke-debugger:internal:dylan#1
  [Dylan Call Frame 0x2321DDBC:0x66E07D2A]
  {Line 1045 of f:\release2\Build\dylan\boot.dylan}
    condition = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}

   condition_  =  Instance of <SIMPLE-ERROR>
     0x66F25714 : condition-format-string = "Object %= cannot be converted to class %="
     0x03FF900C : condition-format-arguments = #[#f, {<class>: <simple-object-vector>}]


#3 DXDYLAN!handle-missed-dispatch-1:dispatch-engine:dylan
  [Dylan Call Frame 0x2321DDE0:0x66E0F2B1]
  {Line 1518 of f:\release2\Build\dylan\new-dispatch.dylan}


#4 DXDYLAN!general_engine_node_n
  [Foreign Call Frame 0x2321DDF0:0x66E6B345]
  {Unknown source location}

#5 DXDYLAN!default-handler:dylan:dylan#1
  [Dylan Call Frame 0x2321DE08:0x66E16F06]
  {Line 123 of f:\release2\Build\dylan\condition.dylan}
    condition = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}

   condition_  =  Instance of <SIMPLE-ERROR>
     0x66F25714 : condition-format-string = "Object %= cannot be converted to class %="
     0x03FF900C : condition-format-arguments = #[#f, {<class>: <simple-object-vector>}]


#6 DXDYLAN!handle-missed-dispatch-1:dispatch-engine:dylan
  [Dylan Call Frame 0x2321DE2C:0x66E0F2B1]
  {Line 1518 of f:\release2\Build\dylan\new-dispatch.dylan}


#7 DXDYLAN!general_engine_node_n
  [Foreign Call Frame 0x2321DE3C:0x66E6B345]
  {Unknown source location}

#8 UNKNOWN!_handler-function_F266
  [Dylan Call Frame 0x2321DE58:0x013B6288]
  {Line 26 of f:\release2\Build\environment-framework\error-handling.dylan}
    _next-handler_ = {<method>: anonymous () => (#rest <object>)}
    condition = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}

   condition_  =  Instance of <SIMPLE-ERROR>
     0x66F25714 : condition-format-string = "Object %= cannot be converted to class %="
     0x03FF900C : condition-format-arguments = #[#f, {<class>: <simple-object-vector>}]

   Unext_handlerU_  =  Instance of <SIMPLE-CLOSURE-METHOD>
     0x66E6954A : xep = 'R'
     0x66F24F2C : function-signature = () => (#rest <object>)
     0x66E16E26 : mep = '\<-77>'
     0x00000011 : environment-size = 4
     0x03FF9028 : environment-element[0] = {<traceable-value-cell>}
     0x03FF9030 : environment-element[1] = {<method>: searchF63 (<object>, <object>) => (#rest <object>)}
     0x03FF901C : environment-element[2] = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}
     0x3F00060C : environment-element[3] = #({<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, ...)


#9 DXDYLAN!searchF63
  [Dylan Call Frame 0x2321DE78:0x66E16E01]
  {Line 85 of f:\release2\Build\dylan\condition.dylan}
    handlers = #({<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>})
    condition = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}

   condition_  =  Instance of <SIMPLE-ERROR>
     0x66F25714 : condition-format-string = "Object %= cannot be converted to class %="
     0x03FF900C : condition-format-arguments = #[#f, {<class>: <simple-object-vector>}]

   handlers_  =  Instance of <PAIR>
     0x03FFA198 : head = {<handler>}
     0x3F00060C : tail = #({<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, ...)


#10 DXDYLAN!error:dylan:dylan#0
  [Dylan Call Frame 0x2321DE88:0x66E16BA5]
  {Line 109 of f:\release2\Build\dylan\condition.dylan}
    noise = #[]
    condition = {<simple-error>: Object #f cannot be converted to class {<class>: <simple-object-vector>}}

   condition_  =  Instance of <SIMPLE-ERROR>
     0x66F25714 : condition-format-string = "Object %= cannot be converted to class %="
     0x03FF900C : condition-format-arguments = #[#f, {<class>: <simple-object-vector>}]

   noise_  =  Instance of <SIMPLE-OBJECT-VECTOR>
     0x00000001 : size = 0


#11 DXDYLAN!handle-missed-dispatch-1:dispatch-engine:dylan
  [Dylan Call Frame 0x2321DEB8:0x66E0F2B1]
  {Line 1518 of f:\release2\Build\dylan\new-dispatch.dylan}


#12 DXDYLAN!general_engine_node_n
  [Foreign Call Frame 0x2321DEC8:0x66E6B345]
  {Unknown source location}

#13 DXDYLAN!apply:dylan:dylan
  [Dylan Call Frame 0x2321DEE8:0x66E06FFD]
  {Line 1016 of f:\release2\Build\dylan\boot.dylan}
    arguments = #["Open Dylan is running very low on memory, so unsaved data may be lost.
Please close any unused projects or applications.", #"title", "Open Dylan", #"style", #"error", #"owner", #f]
    function = {<method>: notify-user (<string> #key frame, owner, title, documentation, exit-boxes, name, style, exit-style, foreground, background, text-style) => (<boolean>, <object>)}

   function_  =  Instance of <KEYWORD-METHOD>
     0x00498E3E : xep = '\<-71>'
     0x004CC7BC : function-signature = (<string> #key frame, owner, title, documentation, exit-boxes, name, style, exit-style, foreground, background, text-style) => (<boolean>, <object>)
     0x00498E44 : mep = {? 0x00498E44}
     0x00498022 : iep = '\b'
     0x004C011C : keyword-specifiers = #[#"frame", #f, #"owner", #f, #"title", #f, #"documentation", #f, #"exit-boxes", #f, ...]

   arguments_  =  Instance of <SIMPLE-OBJECT-VECTOR>
     0x0000001D : size = 7
     0x3F00D29C : vector-element[0] = "Open Dylan is running very low on memory, so unsaved data may be lost.
Please close any unused projects or applications."
     0x63F9B93C : vector-element[1] = #"title"
     0x63F9D86C : vector-element[2] = "Open Dylan"
     0x004CC7D4 : vector-element[3] = #"style"
     0x669170E4 : vector-element[4] = #"error"
     0x66F211A4 : vector-element[5] = #"owner"
     0x66EE70AC : vector-element[6] = #f


#14 UNKNOWN!do-environment-handler:environment-framework:environment-framework#1
  [Dylan Call Frame 0x2321DF2C:0x013B645A]
  {Line 66 of f:\release2\Build\environment-framework\error-handling.dylan}
    next-handler = {<method>: anonymous () => (#rest <object>)}
    condition = {<out-of-memory-condition>}

   condition_  =  Instance of <OUT-OF-MEMORY-CONDITION>
     0x63E517B0 : failing-allocation-class = {<class>: <temporary>}
     0x00000051 : failing-allocation-size = 20

   next_handler_  =  Instance of <SIMPLE-CLOSURE-METHOD>
     0x66E6954A : xep = 'R'
     0x66F24F2C : function-signature = () => (#rest <object>)
     0x66E16E26 : mep = '\<-77>'
     0x00000011 : environment-size = 4
     0x03FFA150 : environment-element[0] = {<traceable-value-cell>}
     0x03FFA158 : environment-element[1] = {<method>: searchF63 (<object>, <object>) => (#rest <object>)}
     0x1FF38BD0 : environment-element[2] = {<out-of-memory-condition>}
     0x337308AC : environment-element[3] = #({<handler>}, {<handler>}, {<handler>})


#15 DXDYLAN!handle-missed-dispatch-1:dispatch-engine:dylan
  [Dylan Call Frame 0x2321DF54:0x66E0F36C]
  {Line 1523 of f:\release2\Build\dylan\new-dispatch.dylan}
    parent = {<simple-typechecked-cache-header-engine-node>}
    args = #[{<out-of-memory-condition>}, {<method>: anonymous () => (#rest <object>)}]
    d = {<absent-engine-node>}

   d_  =  Instance of <ABSENT-ENGINE-NODE>
     0x00000001 : properties = 0
     0x66E0A504 : engine-node-callback = {? 0x66E0A504}
     0x66E6C33B : engine-node-entry-point = {? 0x66E6C33B}

   parent_  =  Instance of <SIMPLE-TYPECHECKED-CACHE-HEADER-ENGINE-NODE>
     0x00020039 : properties = 32782
     0x66EE70AC : engine-node-callback = #f
     0x013B6734 : engine-node-entry-point = {? 0x013B6734}
     0x03FFA2B8 : cache-header-engine-node-next = {<monomorphic-by-class-discriminator>}
     0x013D4DC0 : cache-header-engine-node-parent = {<generic-function>: do-environment-handler (<object>, <object>) => (#rest <object>)}

   args_  =  Instance of <SIMPLE-OBJECT-VECTOR>
     0x00000009 : size = 2
     0x1FF38BD0 : vector-element[0] = {<out-of-memory-condition>}
     0x03FFA174 : vector-element[1] = {<method>: anonymous () => (#rest <object>)}


#16 DXDYLAN!general_engine_node_n
  [Foreign Call Frame 0x2321DF64:0x66E6B345]
  {Unknown source location}

#17 [Dylan Cleanup Frame]

#18 UNKNOWN!environment-handler:environment-framework:environment-framework#0
  [Dylan Call Frame 0x2321DFF0:0x013B61F2]
  {Line 20 of f:\release2\Build\environment-framework\error-handling.dylan}
    next-handler = {<method>: anonymous () => (#rest <object>)}
    condition = {<out-of-memory-condition>}
    _unwind-exception_%exit-14 = 0x2321DFA8
    _original-handlers_ = #({<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>})

   condition_  =  Instance of <OUT-OF-MEMORY-CONDITION>
     0x63E517B0 : failing-allocation-class = {<class>: <temporary>}
     0x00000051 : failing-allocation-size = 20

   next_handler_  =  Instance of <SIMPLE-CLOSURE-METHOD>
     0x66E6954A : xep = 'R'
     0x66F24F2C : function-signature = () => (#rest <object>)
     0x66E16E26 : mep = '\<-77>'
     0x00000011 : environment-size = 4
     0x03FFA150 : environment-element[0] = {<traceable-value-cell>}
     0x03FFA158 : environment-element[1] = {<method>: searchF63 (<object>, <object>) => (#rest <object>)}
     0x1FF38BD0 : environment-element[2] = {<out-of-memory-condition>}
     0x337308AC : environment-element[3] = #({<handler>}, {<handler>}, {<handler>})

   Uunwind_exceptionUPexit_14_  =  Instance of <???>

   Uoriginal_handlersU_  =  Instance of <PAIR>
     0x3F0005F8 : head = {<handler>}
     0x3F0002BC : tail = #({<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, {<handler>}, ...)