#NEWLINE# @ expose ( 'build-path' ) #NEWLINE# def build_path( args ) : #NEWLINE# #INDENT# result = ( [ None ] * len ( args ) ) #NEWLINE# for ( i , s ) in enumerate ( args ) : #NEWLINE# #INDENT# if ( args is UP ) : #NEWLINE# #INDENT# part = '..' #NEWLINE# #UNINDENT# else : #NEWLINE# #INDENT# if ( s is SAME ) : #NEWLINE# #INDENT# part = '.' #NEWLINE# #UNINDENT# else : #NEWLINE# #INDENT# part = extract_path ( s ) #NEWLINE# #UNINDENT# #UNINDENT# if ( not part ) : #NEWLINE# #INDENT# raise SchemeException ( 'build-path: path element is empty' ) #NEWLINE# #UNINDENT# result [ i ] = part #NEWLINE# #UNINDENT# return values . W_Path ( '/' . join ( result ) )