[ 
http://dev.sourcefabric.org/browse/LS-600?page=com.atlassian.jira.plugin.system.issuetabpanels:all-tabpanel
 ]

Romain Beauxis resolved LS-600.
-------------------------------

    Resolution: Fixed

Fixed in c4b973e71263. Also added a regression test.

> list.remove_assoc doesn't work as expected.
> -------------------------------------------
>
>                 Key: LS-600
>                 URL: http://dev.sourcefabric.org/browse/LS-600
>             Project: Liquidsoap
>          Issue Type: Bug
>          Components: Liquidsoap
>    Affects Versions: 1.0
>            Reporter: MartinS4
>            Priority: Major
>
> Original code that led to the bug:
>   dyn_sources :=
>       list.append( [(uri,{ source.shutdown(s0) ; source.shutdown(output) ; 
> print("removing for source id:") ; print(source.id(output)) ; 
> print(sources_metadata_paths) ; sources_metadata_paths := 
> list.remove_assoc(source.id(output), !sources_metadata_paths) ; 
> print(sources_metadata_paths) ; delay := (-1.) })],
>                     !dyn_sources )
> Execution output:
> removing for source id:
> 6d7d15f1-e4fb-4f92-b902-d9630470b3f5
> ref([("6d7d15f1-e4fb-4f92-b902-d9630470b3f5","http://martin-virtualbox/titles";)])
> ref([("6d7d15f1-e4fb-4f92-b902-d9630470b3f5","http://martin-virtualbox/titles";)])
>  
> And below David's answer that confirm/explain the bug:
> OK, this is a bug. I could reproduce by using the primitive
> list.remove(2,[2]) == [2]... Sorry about that. Please file a bug
> report. My guess is that it relies on physical equality rather than
> structural one.
> In the meantime, here's a better implementation (straightforward, but
> there might be typos...):
>   list.remove_assoc =
>    fun(x,l) -> list.fold_left(fun(l,y)->if fst(y)==x then l else
> list.append([y],l) end,[],l)

-- 
This message is automatically generated by JIRA.
-
If you think it was sent incorrectly contact one of the administrators: 
http://dev.sourcefabric.org/secure/Administrators.jspa
-
For more information on JIRA, see: http://www.atlassian.com/software/jira

        

------------------------------------------------------------------------------
Keep Your Developer Skills Current with LearnDevNow!
The most comprehensive online learning library for Microsoft developers
is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3,
Metro Style Apps, more. Free future releases when you subscribe now!
http://p.sf.net/sfu/learndevnow-d2d
_______________________________________________
Savonet-devl mailing list
Savonet-devl@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/savonet-devl

Répondre à