Dopasuj argumenty funkcji do własnych linii

16

Biorąc pod uwagę ciąg znaków reprezentujący definicję funkcji, wypisz ciąg z wstawionymi znakami nowej linii i spacjami, tak aby argumenty funkcji były oddzielone znakiem nowej linii i wyrównane.

Łańcuch wejściowy będzie zgodny z następującym wzorem:

  • Po pierwsze, rozpocznie się od prefiksu, który zawsze ma co najmniej jeden znak i nie zawiera żadnego ze znaków ,().

  • Otwarty nawias ( () oznacza wtedy początek listy argumentów.

  • Następnie pojawi się lista zero lub więcej argumentów. Są one oddzielone ciągiem ", "(przecinek, a następnie spacja). Żaden z argumentów nie będzie zawierał żadnego ze znaków ,().

  • Zamknięty nawias ( )) oznacza koniec listy argumentów.

  • Na koniec może zostać znaleziony postfiks, który ma zero lub więcej znaków i może zawierać znaki ,().

Łańcuch wejściowy będzie się składał wyłącznie z drukowalnego ASCII (co oznacza, że ​​nigdy nie będzie zawierał nowej linii).

Dane wyjściowe muszą być:

  • Prefiks, skopiowany dosłownie i otwarty nawias.

  • Lista argumentów, tym razem oddzielona nie ", "przecinkiem, lecz przecinkiem, znakiem nowej linii i tyloma spacjami, ile potrzeba do wyrównania w pionie pierwszego znaku każdego argumentu.

  • Zamknięty paren i postfiks (jeśli istnieje) dosłownie.

Ponieważ jest to , wygra najkrótszy kod w bajtach.

Przypadki testowe (format: wejście jednowierszowe, następnie wyjście, a następnie podwójna nowa linia):

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)
Klamka
źródło

Odpowiedzi:

7

Haskell, 115 bajtów

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

Przykład użycia:

*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>) {

Jak to działa:

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
nimi
źródło
a>>" "jest naprawdę sprytny ...
Actorclavilis
4

Japt, 23 bajty

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

Przetestuj online!

Jak to działa

               // 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
ETHprodukcje
źródło
3

Perl, 62 52 + 2 = 54 bajty

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

Wymaga -pflagi:

$ 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>) {

Jak to działa:

# '-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
andlrc
źródło
3

Retina, 31 bajtów

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

Zwróć uwagę na spacje na końcu obu linii.

Zastępujemy każde miejsce, które ma ^([^(])*\([^)]*,przed nim wyrażenie regularne . Zastępujący ciąg będzie nową linią, a liczba przechwyceń z ([^(])*plus jedną spacją.

Bardziej spójne wyjaśnienie pojawia się później.

Wypróbuj online tutaj.

randomra
źródło
3

ES6, 68 67 bajtów

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

Działa to poprzez wyodrębnienie listy argumentów z oryginalnego ciągu i zastąpienie każdego separatora argumentów wcięciem obliczonym na podstawie pozycji listy argumentów w oryginalnym ciągu.

Edycja: Zapisano 1 bajt dzięki @ETHproductions.

Neil
źródło
Zastanawiałem się, dlaczego nie .split`, `.join(...)zamiast .replace(...). Okazuje się, że drugi jest o bajt krótszy:s=>s.replace(/\(.*?\)/,(s,n)=>s.replace(/, /g,`,\n `+` `.repeat(n)))
ETHprodukcje
2

Pyth, 35 30 bajtów

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

Wypróbuj tutaj!

Wyjaśnienie:

+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
Denker
źródło
2

Groovy, 137 89 95 bajtów

Groovy nie jest „odpowiednim narzędziem do pracy” ™. Edycja: Działa dobrze, gdy używasz kogoś z mózgiem…

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

Testy:

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)")

Nieco golfisty:

f = {String it ->
    def str = (it + ' ').split(/\)/)
    return (str[0].replace (',', ',\n'+(' ' * it.indexOf('('))) + ')' + str[1])
}
J Atkin
źródło
1

Siatkówka , 47 bajtów

Liczba bajtów zakłada kodowanie ISO 8859-1.

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

Wypróbuj online!

Martin Ender
źródło
1

JavaScript (ES6), 85

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

Test

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>

edc65
źródło
Przepraszam, myliłem się, uruchamiałem kod w mojej konsoli, a wynik był mniej więcej taki: "x y z(xjak widać ", dlatego myślałem, że to jedno wolne miejsce. Stąd usunięcie
andlrc
@ dev-null, które ciągle mi się zdarzają.
edc65
0

Galaretka , 39 bajtów

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

Wypróbuj online!

Erik the Outgolfer
źródło