If its allowed in Haskell then only one line is enough.
import Data.List
stringWithspace :: String -> String
stringWithspace xs = unwords.words $ xs
You can run this program on ideone [ http://ideone.com/RloOE ]
On Aug 12, 8:00 pm, ankit sambyal <ankitsamb...@gmail.com> wrote:
> Guys sorry for posting the buggy code . Here is the working code :
>
> void delExtraSpaces (char Str[])
> {
> int Pntr = 0;
> int Dest = 0;
> int flag=0;
> while (Str[Pntr]!='\0')
> {
> if (Str[Pntr] != ' ')
> {
> Str[Dest++] = Str[Pntr];
> flag=0;}
>
> else if(Str[Pntr]==' ' && flag==0)
> {
> Str[Dest++] = Str[Pntr];
> flag=1;
>
> }
>
> Pntr++;
>
> }
>
> Str[Dest] = '\0';
>
>
>
>
>
>
>
> }
--
You received this message because you are subscribed to the Google Groups
"Algorithm Geeks" group.
To post to this group, send email to algogeeks@googlegroups.com.
To unsubscribe from this group, send email to
algogeeks+unsubscr...@googlegroups.com.
For more options, visit this group at
http://groups.google.com/group/algogeeks?hl=en.
