fixed find-bar

[o_e]

Hi,

 

I'am examing find-bar and I don't get the following:

;from the docs:

(setf mat
	   '((c4 db4 ab4 f4 g4 bb4) (a4 eb4 b4 e4 d4 gb4)
	     (db4 ab4 f4 g4 bb4 a4) (eb4 b4 e4 d4 gb4 c4)))

(find-bar 1 mat)
=> Error: The value (1) is not of the expected type number.
> While executing: ccl::+-2-into, in process Listener-1(7).
> Type cmd-. to abort, cmd-\ for a list of available restarts.
> Type :? for other options.

;this works fine:

(find-bar '(1) mat)
=>((c4 db4 ab4 f4 g4 bb4))

??

 

best

 

ole

[o_e]

I know this is only a (very) minor issue, nevertheless I'd like to know if I'am the only one having this problem..

Thanks!

[AM]

you have to put the bar-numbers into a list... i makes sense in my opinion - perhaps you want to "find" more then one bar...

 

(find-bar '(1 2) mat)
=> ((c4 db4 ab4 f4 g4 bb4) (a4 eb4 b4 e4 d4 gb4))

 

[o_e]

exactly that's what I've shown in my first post

But most of the function work as well with an 'naked' integer as with a quoted list, and like this it is described in the doc of 'find-bar'. I assume it should be consistent among the functions, thats why I've pointed it out..

[AM]

i know   i'm not a programmer, but it probably makes sense to be able to enter both variants/formats for some functions, but not for others...

[opmo]

Is fixed already with FT function inside - next update.
 

(ft '(1 3 6..9 11))
=> (1 3 6 7 8 9 11)

(ft '0..12)
=> (0 1 2 3 4 5 6 7 8 9 10 11 12)

(ft '0..-12)
=> (0 -1 -2 -3 -4 -5 -6 -7 -8 -9 -10 -11 -12)

(ft '(1 3 6..9 11))
=> (1 3 6 7 8 9 11)

(ft '(0..12 11..0))
=> (0 1 2 3 4 5 6 7 8 9 10 11 12 11 10 9 8 7 6 5 4 3 2 1 0)

 

[opmo]

Fixed in 2.1.26251