Fixed List construction

1. The issue is raise against case like :
- ( 1 ( 2 3 ) 4 )
- ( 1 ( 2 3))
2. This affect other higher level functions