Opened 11 years ago
Closed 6 years ago
#456 closed defect (fixed)
"Search Files" exception when no "In Folder" specified
Reported by: | ddp | Owned by: | rme |
---|---|---|---|
Priority: | normal | Milestone: | |
Component: | IDE | Version: | |
Keywords: | Cc: |
Description
Leaving the "In Folder:" field blank in "Tools" > "Search Files..." results in the following (1.3):
* Error in event process: Array index -1 out of bounds for "" .
(442A48) : 0 (FUNCALL #'#<(:INTERNAL GUI::sendEvent:?|)> #<SIMPLE-ERROR #x300041B6B09D>) 149 (#:G5207)
#:G5207: #<SIMPLE-ERROR #x300041B6B09D>
#:COMPILER-VAR: (NIL) #:G5204: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFF950>
(442A70) : 1 (SIGNAL #<SIMPLE-ERROR #x300041B6B09D>) 981
(CONDITION &REST CCL::ARGS)
CONDITION: #<SIMPLE-ERROR #x300041B6B09D> CCL::ARGS: NIL
CCL::%HANDLERS%: ((ERROR) (ERROR)) CCL::TAG: (CONDITION #<COMPILED-LEXICAL-CLOSURE # #x493DBF>) CCL::HANDLERS: (CONDITION #<COMPILED-LEXICAL-CLOSURE # #x493DBF>)
CCL::FN: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::sendEvent:?|) #x493DBF>
(442AC8) : 2 (%ERROR #<SIMPLE-ERROR #x300041B6B09D> (-1 "") 558468) 117
(CONDITION CCL::ARGS CCL::ERROR-POINTER)
CONDITION: #<SIMPLE-ERROR #x300041B6B09D> CCL::ARGS: (-1 "") CCL::ERROR-POINTER: 558468
(442AF0) : 3 (FUNCALL #'#<(:INTERNAL CCL::%XERR-DISP)>) 2485
NIL
CCL::FRAME-PTR: 558468 CCL::FN: #<METHOD-FUNCTION GUI::GET-FULL-DIR-STRING (STRING)> CCL::OP0: 205 CCL::OP1: 200 CCL::OP2: 103 CCL::SKIP: 3 CCL::XP: #<A Foreign Pointer #x7FFF5FBFF660> CCL::XCF: #<A Foreign Pointer #x442C20>
(442B40) : 4 (FUNCALL-WITH-ERROR-REENTRY-DETECTION #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #x493CCF>) 181
(CCL::THUNK)
CCL::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #x493CCF>
COUNT: 0 CCL::*ERROR-REENTRY-COUNT*: 0
(442B80) : 5 (FUNCALL #'#<CCL::%XERR-DISP> 17591849975238) 493
(#:G129179)
#:G129179: 17591849975238
#:G129189: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFEE30> CCL::XP: #<A Foreign Pointer #x7FFF5FBFF660> CCL::XCF: #<A Foreign Pointer #x442C20> #:G129190: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%XERR-DISP) #x493CCF>
(442BB8) : 6 (%PASCAL-FUNCTIONS% 2 17591849975238) 397
(CCL::INDEX CCL::ARGS-PTR-FIXNUM)
CCL::INDEX: 2 CCL::ARGS-PTR-FIXNUM: 17591849975238
CCL::LISP-FUNCTION: #<Compiled-function CCL::%XERR-DISP (Non-Global) #x3000405E1CCF> WITHOUT-INTERRUPTS: NIL CCL::*CALLBACK-TRACE-P*: NIL
*(442C20) : 8 (FUNCALL #'#<#<STANDARD-METHOD GUI::GET-FULL-DIR-STRING (STRING)>> "") 109
(GUI::STR)
GUI::STR: ""
GUI::RET: ""
(442C80) : 9 (FUNCALL #'#<#<STANDARD-METHOD GUI::GET-FULL-DIR-STRING (NS:NS-STRING)>> #<NS-MUTABLE-STRING "" (#x7FFF70218220)>) 85
(GUI::NSSTRING)
GUI::NSSTRING: #<NS-MUTABLE-STRING "" (#x7FFF70218220)>
(442CA0) : 10 (FUNCALL #'#<(:INTERNAL GUI::doSearch?|)>) 261 NIL
#:G32960: #<SEARCH-FILES-WINDOW-CONTROLLER <SearchFilesWindowController: 0x16ea1af0> (#x16EA1AF0)> GUI::FIND-NSTR: #<NS-MUTABLE-STRING "forge" (#x16EF3C10)> GUI::FOLDER-NSTR: #<NS-MUTABLE-STRING "" (#x7FFF70218220)> GUI::FILE-NAME-NSTR: #<NS-CONSTANT-STRING "*.lisp" (#x1A0480)> GUI::WC: #<SEARCH-FILES-WINDOW-CONTROLLER <SearchFilesWindowController: 0x16ea1af0> (#x16EA1AF0)>
(442CD8) : 11 (HANDLE-INVOKING-LISP-FUNCTION #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::doSearch?|) #x300041B6B8DF> NIL NIL #<APPKIT-PROCESS Initial(0) [Active] #x3000404AFE4D>) 605 (GUI::THUNK GUI::RESULT-HANDLER GUI::CONTEXT &OPTIONAL GUI::INVOKING-PROCESS)
GUI::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::doSearch?|) #x300041B6B8DF> GUI::RESULT-HANDLER: NIL GUI::CONTEXT: NIL GUI::INVOKING-PROCESS: #<APPKIT-PROCESS Initial(0) [Active] #x3000404AFE4D>
GUI::*INVOKING-EVENT-PROCESS*: #<APPKIT-PROCESS Initial(0) [Active] #x3000404AFE4D> GUI::*INVOKING-EVENT-CONTEXT*: NIL
(442D48) : 12 (FUNCALL #'#<#<STANDARD-METHOD GUI::INVOKE-LISP-FUNCTION (NS:NS-APPLICATION T)>> #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> 1) 357
(GUI::SELF GUI::ID)
GUI::SELF: #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> GUI::ID: 1
#:WHOLE5114: (#<COMPILED-LEXICAL-CLOSURE # #x300041B6B8DF> NIL NIL . #<APPKIT-PROCESS Initial(0) [Active] #x3000404AFE4D>) #:ARGS5115: #<CCL::DESTRUCTURE-STATE #x493D2D>
GUI::THUNK: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::doSearch?|) #x300041B6B8DF> GUI::RESULT-HANDLER: NIL GUI::CONTEXT: NIL #:REST5116: #<APPKIT-PROCESS Initial(0) [Active] #x3000404AFE4D>
(442DA0) : 13 (FUNCALL #'#<GUI::|-[LispApplication sendEvent:]|> 17591849975594) 1037
(#:G5203)
#:G5203: 17591849975594
#:G5219: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFF950> #:G5204: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFF950> #:COMPILER-VAR: (NIL)
#:G5209: #<COMPILED-LEXICAL-CLOSURE (:INTERNAL GUI::sendEvent:?|) #x493DBF> #:G5220: (CONDITION #<COMPILED-LEXICAL-CLOSURE # #x493DBF>) CCL::%HANDLERS%: ((CONDITION #) (ERROR)) GUI::SELF: #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> GUI::_CMD: #<A Foreign Pointer #x7FFF823B6D48> GUI::E: #<NS-EVENT NSEvent: type=AppDefined? loc=(0,0) time=0.0 flags=0 win=0x0 winNum=0 ctxt=0x0 subtype=17 data1=1 data2=0 (#x18D0CF10)>
(442E10) : 14 (%PASCAL-FUNCTIONS% 14 17591849975594) 397
(CCL::INDEX CCL::ARGS-PTR-FIXNUM)
CCL::INDEX: 14 CCL::ARGS-PTR-FIXNUM: 17591849975594
CCL::LISP-FUNCTION: #<Compiled-function GUI::sendEvent:?| (Non-Global) #x30004141353F> WITHOUT-INTERRUPTS: NIL CCL::*CALLBACK-TRACE-P*: NIL
(442ED0) : 16 (FUNCALL #'#<Anonymous Function #x30004132E96F> #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> #S(CCL::OBJC-SELECTOR :NAME "run" :%SEL #<A Foreign Pointer #x7FFF8246DD68>)) 205
(#:G2814 #:G2815)
#:G2814: #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> #:G2815: #S(CCL::OBJC-SELECTOR :NAME "run" :%SEL #<A Foreign Pointer #x7FFF8246DD68>)
(442EF0) : 17 (FUNCALL #'#<(:INTERNAL CCL::SEND-UNAMBIGUOUS-MESSAGE (SHARED-INITIALIZE :AFTER (CCL::OBJC-DISPATCH-FUNCTION T)))> #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)>) 533
(CCL::RECEIVER &REST CCL::ARGS)
CCL::RECEIVER: #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> CCL::ARGS: NIL
CCL::SELECTOR: #S(CCL::OBJC-SELECTOR :NAME "run" :%SEL #<A Foreign Pointer #x7FFF8246DD68>) FUNCTION: #<Anonymous Function #x30004132E96F>
(442F30) : 18 (EVENT-LOOP NIL) 389
(&OPTIONAL GUI::END-TEST)
GUI::END-TEST: NIL
GUI::APP: #<LISP-APPLICATION <LispApplication: 0x1be5d0> (#x1BE5D0)> *BREAK-ON-ERRORS*: NIL #:G7036: (ERROR) CCL::%HANDLERS%: ((ERROR)) GUI::*EVENT-PROCESS-REPORTED-CONDITIONS*: (#<SIMPLE-ERROR #x300041B6B09D>)
(442FA8) : 19 (RUN-EVENT-LOOP) 117
NIL
Change History (3)
comment:1 Changed 11 years ago by rme
- Owner changed from gz to rme
- Status changed from new to assigned
comment:2 Changed 9 years ago by jaj
comment:3 Changed 6 years ago by gz
- Resolution set to fixed
- Status changed from assigned to closed
This got fixed by disabling the search button when the folder is blank
Reassigned to jaj. Fixed while working on Search files improvements. Leaving it open until checked in.