problem with mapconcat

problem with mapconcat

[Christian Wittern]

Hi there,

I am trying to build a regex with lisp, which inserts a certain string 
into another string between each character, for example "abc" should 
turn into "a/b/c". 

With mapconcat, I think this should work:

(mapconcat 'identity (string-to-list "abc") "/")

since the description for mapconcat says

(mapconcat FUNCTION SEQUENCE SEPARATOR)

However, when I try to evaluate this in Emacs 23.1, here it throws the 
following error:

Debugger entered--Lisp error: (wrong-type-argument sequencep 97)
  mapconcat(identity (97 98 99) "/")
  eval((mapconcat (quote identity) (string-to-list "abc") "/"))

I wonder what I am doing wrong or if there is another way to achieve
 what I am trying to do.

Any help appreciated,

Christian

Re: problem with mapconcat

[Dan Davison]

Christian Wittern <cwittern@gmail.com> writes:

> Hi there,
>
> I am trying to build a regex with lisp, which inserts a certain string 
> into another string between each character, for example "abc" should 
> turn into "a/b/c". 
>
> With mapconcat, I think this should work:
>
> (mapconcat 'identity (string-to-list "abc") "/")
>
> since the description for mapconcat says
>
> (mapconcat FUNCTION SEQUENCE SEPARATOR)
>
> However, when I try to evaluate this in Emacs 23.1, here it throws the 
> following error:
>
> Debugger entered--Lisp error: (wrong-type-argument sequencep 97)
>   mapconcat(identity (97 98 99) "/")
>   eval((mapconcat (quote identity) (string-to-list "abc") "/"))
>
> I wonder what I am doing wrong or if there is another way to achieve
>  what I am trying to do.

These do it

(mapconcat 'char-to-string (string-to-list "abc") "/")
(mapconcat 'identity (split-string "abc" "" t) "/")

Dan

>
> Any help appreciated,
>
> Christian

Re: problem with mapconcat

[Christian Wittern]

On 2010-03-03 22:50, Dan Davison wrote:
> These do it
> (mapconcat 'char-to-string (string-to-list "abc") "/")
> (mapconcat 'identity (split-string "abc" "" t) "/")
>
> Dan
>    
Ah, indeed!  That is great, thanks!

Christian

Re: problem with mapconcat

[Teemu Likonen]

* 2010-03-03 12:49 (UTC), Christian Wittern wrote:

> I am trying to build a regex with lisp, which inserts a certain string
> into another string between each character, for example "abc" should
> turn into "a/b/c".

(mapconcat #'identity (mapcar #'char-to-string "abc") "/")

=> "a/b/c"

Re: problem with mapconcat

[Thamer Mahmoud]

Teemu Likonen <tlikonen@iki.fi> writes:

> * 2010-03-03 12:49 (UTC), Christian Wittern wrote:
>
>> I am trying to build a regex with lisp, which inserts a certain string
>> into another string between each character, for example "abc" should
>> turn into "a/b/c".
>
> (mapconcat #'identity (mapcar #'char-to-string "abc") "/")
>
> => "a/b/c"

Another alternative:

(mapconcat 'string (string-to-list "abc") "/")

=> "a/b/c"

Re: problem with mapconcat

[Thamer Mahmoud]

Thamer Mahmoud <thamer.mahmoud@gmail.com> writes:
> Another alternative:
>
> (mapconcat 'string (string-to-list "abc") "/")
>
> => "a/b/c"

After sending the above, I realized that this would work too:

(mapconcat 'string "abc" "/")

Re: problem with mapconcat

[Christian Wittern]

Thamer Mahmoud <thamer.mahmoud <at> gmail.com> writes:

> 
> After sending the above, I realized that this would work too:
> 
> (mapconcat 'string "abc" "/")
> 
Great, this seems to be the simplest, thank you!

Christian 

Re: problem with mapconcat

[Kevin Rodgers]

Christian Wittern wrote:
> I am trying to build a regex with lisp, which inserts a certain string 
> into another string between each character, for example "abc" should 
> turn into "a/b/c". 
> 
> With mapconcat, I think this should work:
> 
> (mapconcat 'identity (string-to-list "abc") "/")
> 
> since the description for mapconcat says
> 
> (mapconcat FUNCTION SEQUENCE SEPARATOR)
> 
> However, when I try to evaluate this in Emacs 23.1, here it throws the 
> following error:
> 
> Debugger entered--Lisp error: (wrong-type-argument sequencep 97)
>   mapconcat(identity (97 98 99) "/")
>   eval((mapconcat (quote identity) (string-to-list "abc") "/"))
> 
> I wonder what I am doing wrong or if there is another way to achieve
>  what I am trying to do.

The reason your first attempt failed is that string-to-list returns a list of
characters, and identity obviously returns each character -- but mapconcat
requires that FUNCTION return a string.

As Thamer Mahmoud showed, string-to-list is unnecessary:

(mapconcat 'char-to-string "abc" "/")

-- 
Kevin Rodgers
Denver, Colorado, USA

Re: problem with mapconcat

[Andreas Röhler]

Thamer Mahmoud wrote:
> Thamer Mahmoud <thamer.mahmoud@gmail.com> writes:
>> Another alternative:
>>
>> (mapconcat 'string (string-to-list "abc") "/")
>>
>> => "a/b/c"
> 
> After sending the above, I realized that this would work too:
> 
> (mapconcat 'string "abc" "/")
> 
> 
> 
> 
> 

That seems to work either, whats strange for me:

(mapconcat 'list "abc" "/")"a/b/c"


Andreas

Re: problem with mapconcat

[Stephen Berman]

On Thu, 04 Mar 2010 08:36:46 +0100 Andreas Röhler <andreas.roehler@easy-emacs.de> wrote:

> Thamer Mahmoud wrote:
>> Thamer Mahmoud <thamer.mahmoud@gmail.com> writes:
>>> Another alternative:
>>>
>>> (mapconcat 'string (string-to-list "abc") "/")
>>>
>>> => "a/b/c"
>> 
>> After sending the above, I realized that this would work too:
>> 
>> (mapconcat 'string "abc" "/")
>> 
>> 
>> 
>> 
>> 
>
> That seems to work either, whats strange for me:
>
> (mapconcat 'list "abc" "/")"a/b/c"

Maybe this helps clarify why that works:

(let (r)
  (dolist (e (string-to-list "abc") r)
    (setq r (concat r (if (null r) "" "/") (list e)))))

Steve Berman

Re: problem with mapconcat

[Andreas Röhler]

Stephen Berman wrote:
> On Thu, 04 Mar 2010 08:36:46 +0100 Andreas Röhler <andreas.roehler@easy-emacs.de> wrote:
> 
>> Thamer Mahmoud wrote:
>>> Thamer Mahmoud <thamer.mahmoud@gmail.com> writes:
>>>> Another alternative:
>>>>
>>>> (mapconcat 'string (string-to-list "abc") "/")
>>>>
>>>> => "a/b/c"
>>> After sending the above, I realized that this would work too:
>>>
>>> (mapconcat 'string "abc" "/")
>>>
>>>
>>>
>>>
>>>
>> That seems to work either, whats strange for me:
>>
>> (mapconcat 'list "abc" "/")"a/b/c"
> 
> Maybe this helps clarify why that works:
> 
> (let (r)
>   (dolist (e (string-to-list "abc") r)
>     (setq r (concat r (if (null r) "" "/") (list e)))))
> 
> Steve Berman
> 
> 
> 
> 

Thanks. Assumed wrongly result type of mapconcat follows function applied.
But it's concat which defines the result type, as function name says...


Andreas