view [
vid-code: area 300x200 {
tab-panel1: tab-panel
"tab-panel1" [
"Tab-A" [tab-a-btn1: button "tab-A-btn1"]
"Tab-B" [tab-b-btn1: button "tab-B-btn1"]
]
}
output-panel: panel 200x200 gray
button "Refresh Panel" [
output-panel/pane: layout/only load vid-code/text
]
]red+view-debug-master-2022-09-09-2ba8188.exe and before doesn't crashred+view-debug-master-2022-09-11-85fa7e7.exe and after all crashingview [ part @mikeyaunish >> sort/compare [7 3 4 9 8 1 6 4 3] function [a b] [x: 0 a < b] == [1 3 3 4 4 6 7 8 9]
o1: make object! [x: 1 y: 90] o2: make object! [x: 2 y: 1] o3: make object! [x: 2 y: 2] data: reduce [o1 o2 o3] sort/compare data func [a b /local ra rb][ ra: a/x + a/y print [ra a/x a/y] rb: b/x + b/y print [rb b/x b/y] return ra < rb ] probe data
o1: make object! [x: 1 y: 90] o2: make object! [x: 2 y: 1] o3: make object! [x: 2 y: 2] data: random reduce [o1 o2 o3 o1 o1 o2 o3 o2] s-func: func [a b /x /local ra rb][ ra: a/x + a/y print [ra a/x a/y] rb: b/x + b/y print [rb b/x b/y] return ra < rb ] sort/compare data :s-func *** Script Error: rb is missing its value argument *** Where: rb *** Near : return ra < rb
>> sort [a /a] == [a /a] >> sort/reverse [a /a] == [/a a] >> sort/case [a /a] == [a /a] >> sort/case/reverse [a /a] == [/a a]
>> sort [a /a] == [a /a] >> sort/reverse [a /a] == [a /a] >> sort/case [a /a] == [a /a] >> sort/case/reverse [a /a] == [a /a]
Red [] catch [do %scriptB.red]
Red [] throw 1
*** Throw Error: no catch for throw: 1 *** Where: transcode *** Near : do %scriptB.red *** Stack: probe do-file load
do contains an implicit catch, so you need to catch your throws within the script that throws them (or resort to do/expand load %scriptB.red)halt works somehow... ;)do* native I've come to agree that what you reported is also a bug, since code intends to re-throw catches (but for some reason they aren't caught)*** Script Error: pick does not allow none! for its index argument *** Where: pick *** Near : all [word = 'selected block? data find [] ] *** Stack: do-file
view [
l: text-list 100x100 data ["One" "Two"]
with [ selected: 1 ]
button {click me to get the error} [ l/selected: none ]
button {works with 0} [ l/selected: 0 ]
button {works with 2} [ l/selected: 2 ]
button {silent with -1} [ l/selected: -1 ]
button {silent with 3} [ l/selected: 3 ]
]mpv with direct3d video output it says "unable to init video output" and terminates. Until I get back to GUI console and press Alt+Enter again, or quit it.view layout [ button "Error text" [ print xyz ]]. Then click on the 'Error text' button. When the output gets to the bottom of the console it is truncated like this: