При вводе строки, представляющей определение функции, выведите строку со вставленными символами новой строки и пробелами, чтобы аргументы функции были разделены и выровнены по новой строке.

Входная строка будет следовать следующей схеме:

• Во-первых, он начинается с префикса, который всегда имеет длину не менее одного символа и не содержит никаких символов ,().

• Открытая скобка ( () будет отмечать начало списка аргументов.

• Список ноль или более аргументов будет следовать. Они разделяются строкой ", "(запятая, а затем пробел). Ни один из аргументов не будет содержать никаких символов ,().

• Закрывающая скобка ( )) будет отмечать конец списка аргументов.

• Наконец, может быть найден постфикс, длина которого равна нулю или более и может содержать символы ,().

Входная строка будет состоять исключительно из печатного ASCII (что означает, что она никогда не будет содержать перевод строки).

Выход должен быть:

• Префикс, скопированный дословно, и открытая скобка.

• Список аргументов, на этот раз разделенный не ", "запятой, и новой строкой, и столько пробелов, сколько необходимо для вертикального выравнивания первого символа каждого аргумента.

• Близкое слово и постфикс (если он существует) дословно.

Поскольку это код-гольф , победит самый короткий код в байтах.

Контрольные примеры (формат: однострочный ввод с последующим выводом и двойной новой строкой):

def foo(bar, baz, quux):
def foo(bar,
        baz,
        quux):

int main() {
int main() {

fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

function g(h) {
function g(h) {

def abc(def, ghi, jkl, mno)
def abc(def,
        ghi,
        jkl,
        mno)

x y z(x, y, z) x, y, z)
x y z(x,
      y,
      z) x, y, z)

Haskell, 115 байт

import Data.Lists
f x|(a,b:c)<-span(/='(')x,(d,e)<-span(/=')')c=a++b:intercalate(",\n "++(a>>" "))(splitOn", "d)++e

Пример использования:

*Main> putStrLn $ f "fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {"
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

Как это устроено:

bind
  a: everything before the first (
  b: the first (
  c: everything after the first (
  d: everything of c before the first )
  e: everything of c from the first ) to the end

construct the output string by concatenating
  a
  b
  splitting d at the argument separator ", " and rejoining it with ",\n " followed by (length a) spaces    
  e

Japt, 23 байта

¡Y?X:Xr',",
"+SpUb'(}')

Проверьте это онлайн!

Как это устроено

               // Implicit: U = input string
¡        }')   // Map each item X and index Y in U.split(")") to:
Y?X            //  If Y is non-zero, X. This keeps e.g. "(String, Vec<i32>)" from being parsed.
:Xr',",\n"+    //  Otherwise, X with each comma replaced with ",\n" concatenated with
SpUb'(         //  U.indexOf("(") spaces.
               // Implicit: re-join with ")", output

Perl, 62 52 + 2 = 54 байта

s/\(.*?\)/$a=$"x length$`;$&=~s|(?<=,)[^,]+|\n$a$&|gr/e

Требуется -pфлаг:

$ echo "x y z(x, y, z) x, y, z)
fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {" | \
perl -pe's/\(.*?\)/$a=$"x length$`;$&=~s|(?<=,)[^,]+|\n$a$&|gr/e'
x y z(x,
      y,
      z) x, y, z)
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

Как это устроено:

# '-p' reads first line into $_ and will also auto print at the end
s/\(.*?\)/             # Match (...) and replace with the below
  $a=$"x length$`;     # $` contains all the content before the matched string
                       # And $" contains a literal space 
  $&=~s|               # Replace in previous match
    (?<=,)[^,]+        # Check for a , before the the string to match
                       # This will match ' b: f64', ' c: String'
  |\n$a$&|gr/e         # Replace with \n, [:spaces:] and all the matched text

Сетчатка, 31 байт

(?<=^([^(])*\([^)]*,) 
¶ $#1$* 

Обратите внимание на пробелы в конце обеих строк.

Мы заменяем каждое пространство, ^([^(])*\([^)]*,перед которым находится регулярное выражение . Заменяющая строка будет новой строкой, а количество перехватов ([^(])*плюс один пробел.

Более последовательное объяснение приходит позже.

Попробуйте это онлайн здесь.

ES6, 68 67 байт

s=>s.replace(/\(.*?\)/,(s,n)=>s.replace/, /g, `,
 `+` `.repeat(n)))

Это работает путем извлечения списка аргументов из исходной строки и замены каждого разделителя аргументов отступом, рассчитанным по позиции списка аргументов в исходной строке.

Редактировать: 1 байт сохранен благодаря @ETHproductions.

Pyth, 35 30 байт

+j++\,b*dhxz\(c<zKhxz\)", ">zK

Попробуй это здесь!

Объяснение:

+j++\,b*dhxz\(c<zKhxz\)", ">zK    # z = input()

                 Khxz\)           # Get index of the first ")"
               <z                 # Take the string until there...
              c        ", "       # ...and split it on the arguments
 j                                # Join the splitted string on...
  ++                              # ...the concatenation of...
    \,b                           # ...a comma followed by a newline...
       *dhxz\(                    # ...followed by the right amount of spaces = index of the first "(" + 1
+                         >zK     # Concat the resulting string with the postfix

Groovy, 137 89 95 байт

Groovy не является «Правильным инструментом для работы» ™. Редактировать: это работает просто отлично, когда у вас есть кто-то с мозгом, использующим его ...

f={s=(it+' ').split(/\0/)
s[0].replace(',',',\n'+(' '*it.indexOf('(')))+')'+s[1..-1].join(')')}

тесты:

println f("def foo(bar, baz, quux):")
println f("int main() {")
println f("fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {")
println f("function g(h) {")
println f("def abc(def, ghi, jkl, mno)")
println f("x y z(x, y, z) x, y, z)")

Немного не одураченный

f = {String it ->
    def str = (it + ' ').split(/\)/)
    return (str[0].replace (',', ',\n'+(' ' * it.indexOf('('))) + ')' + str[1])
}

Сетчатка , 47 байт

Количество байтов предполагает кодировку ISO 8859-1.

m+`^(([^(]+.)[^,)]+,) (.+)
$1¶$2$3
T`p` `¶.+?\(

Попробуйте онлайн!

JavaScript (ES6), 85

s=>s.replace(/^.*?\(|[^),]+, |.+/g,(x,p)=>[a+x,a=a||(p?`
`+' '.repeat(p):a)][0],a='')

Тестовое задание

f=s=>s.replace(/^.*?\(|[^),]+, |.+/g,(x,p)=>[a+x,a=a||(p?`
`+' '.repeat(p):a)][0],a='')

console.log=x=>O.textContent+=x+'\n'

;['def foo(bar, baz, quux):',
  'int main() {',
  'fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {',
  'function g(h) {',
  'def abc(def, ghi, jkl, mno)',
  'x y z(x, y, z) x, y, z)']
.forEach(t=>console.log(t+'\n'+f(t)+'\n'))

<pre id=O></pre>

Желе , 39 байт

ṣ”)Ḣṣ”(Ṫ©œṣ⁾, ji”(⁶ẋƊ⁾,¶;ƊḢ,j®${jʋ@œṣ®$

Попробуйте онлайн!