Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Assorted bugs?

From: atruter:hih:au at: 6-May-2002 16:15

Another marathon weekend with REBOL and a few more "things that don't work the way I expect them to". Apologies in advance if some of these have already been covered in depth (eScribe searches just don't cut it ;) ). Problems I hit were: 1. Scrolled area text affecting other field(s) 2. text-list anomalies with first entry 3. alt-down SLOW under windows (but OK under Linux) 4. load treating a one line block as a block, but multi-lines as blocks within a block, makes it hard to write something like: foreach block load %test.dat [print block/1] ; this handles 0 and > 1 lines but not 1 line Anyway, the code to demo these "problems" is given below, any advice on simple work-arounds / misconceptions greatly appreciated. If any need to go to feedback let me know. (On a related matter, how can one tell what has already been sent to feedback . . . is there a "reported bug" summary of some sort?). <code> REBOL [] files: copy [] foreach file read %. [ insert tail files reform ["o^-" file] ] view center-face layout [ text 200 {Click "Area" then type two lines of text in the area, close and reopen the window. Notice how the field text has been repositioned.} button 200 "Area" [ view/new center-face layout [ field 50 "Text" area 50x30 ] ] text 200 {Notice how the first tab is ignored.} text-list data files text 200 {Click rapidly with the left then right mouse buttons. Notice how left clicks are faster than right clicks [on Windoze].} box blue 200x50 "Click here" with [ data: now/time/precise feel: make feel [ engage: func [face action event] [ if action = 'alt-down [ print reform ["Right" now/time/precise - face/data] face/data: now/time/precise ] if action = 'down [ print reform ["Left" now/time/precise - face/data] face/data: now/time/precise ] ] ] ] text 200 {The first result counts values within a block, the second the number of blocks.} button 200 "Load block(s)" [ write/lines %test.dat remold [now now] print length? load %test.dat write/append/lines %test.dat remold [now now] print length? load %test.dat ] ] </code> Regards, Ashley