Mój współpracownik, Jimmy, jest nowy w C / C ++. Jest także trochę powolnym uczniem. Teraz, żeby być uczciwym, jego kod zawsze się kompiluje, ale ma kilka naprawdę niechlujnych nawyków. Na przykład wszyscy wiedzą, że możesz zdefiniować tablicę w następujący sposób:

int spam[] = {4, 8, 15, 16, 23, 42};

Wszyscy, z wyjątkiem Jimmy'ego. Jest przekonany, że jedynym sposobem na utworzenie tablicy jest:

int spam[6];
spam[0] = 4;
spam[1] = 8;
spam[2] = 15;
spam[3] = 16;
spam[4] = 23;
spam[5] = 42;

Ciągle go naprawiam w przeglądzie kodu, ale się nie nauczy. Potrzebuję więc napisać narzędzie, które zrobi to za niego automatycznie, gdy się zaangażuje¹.

Wyzwanie

Chcę, abyś napisał pełny program lub funkcję, która pobiera ciąg danych wielowierszowych jako dane wejściowe i wyświetla bardziej zwartą wersję tablicy C. Dane wejściowe zawsze będą miały ten format, łącznie z białymi znakami:

identifier_one identifier_two[some_length];
identifier_two[0] = some_number;
identifier_two[1] = some_number;
identifier_two[2] = some_number;
...
identifier_two[some_length - 1] = some_number;

Krótko mówiąc, dane wejściowe zawsze będą prawidłowe i dobrze zdefiniowane C. Bardziej szczegółowo:

Wszystkie identyfikatory będą się składały z samych liter i znaków podkreślenia. Długość zawsze będzie wynosić co najmniej jeden i nigdy nie będzie żadnych brakujących lub poza granicami indeksów. Możesz także założyć, że indeksy są w porządku. Na przykład:

foo bar[3];
bar[0] = 1
bar[2] = 9;

foo bar[1];
bar[0] = 1;
bar[1] = 3;

i

foo bar[3];
bar[2] = 9;
bar[0] = 1
bar[1] = 3

wszystkie są nieprawidłowymi danymi wejściowymi i mogą powodować nieokreślone zachowanie w zgłoszeniu. Możesz również założyć, że wszystkie liczby będą prawidłowymi liczbami dziesiętnymi, ujemnymi lub dodatnimi. Wejście nie będzie miało obcych przestrzeni. Dane wyjściowe powinny zawsze mieć ten format, łącznie z białymi znakami:

identifier_one identifier_two[] = {n1, n2, n3, ...};

Oto kilka przykładowych danych:

Input:
spam eggs[10];
eggs[0] = 0;
eggs[1] = 4;
eggs[2] = 8;
eggs[3] = -3;
eggs[4] = 3;
eggs[5] = 7;
eggs[6] = 888;
eggs[7] = 555;
eggs[8] = 0;
eggs[9] = -2;

Output:
spam eggs[] = {0, 4, 8, -3, 3, 7, 888, 555, 0, -2};

Input:
char ans[2];
ans[0] = 52;
ans[1] = 50;

Output:
char ans[] = {52, 50};

Input:
blah_blah quux[1];
quux[0] = 105;

Output:
blah_blah quux[] = {105};

Możesz przyjmować dane wejściowe i wyjściowe w dowolnym rozsądnym formacie, takim jak STDIN / STDOUT, argumenty funkcji i wartość zwracana, odczytywanie i zapisywanie plików itp. Obowiązują standardowe luki. Najkrótsza odpowiedź w bajtach wygrywa!

¹ Jest to pasywno-agresywny i okropny pomysł. Ty nie nie dostać ten pomysł ode mnie.

Wigor, 43 36 bajtów

Nie musisz dawać Jimmy'emu skryptu, po prostu naucz go, jak używać odpowiedniego edytora tekstu. (dosłowne zwroty dla jasności)

:%s/.*=//|%s/;\n/,/<cr><cr>
3wcf ] = {<esc>
$s};

CJam, 43 36 bajtów

qN/('[/~;"[] = {"@{S/W=W<}%", "*"};"

Przykład online

Wyjaśnienie:

qN/                                     |Read all lines to array
   ('[/~;                               |slice first line left of [
         "[] = {"                       |add formatting to stack
                 @                      |rotate to remaining lines
                  {      }%             |for each line in array
                   S/W=                 |split after last space
                       W<               |remove last character (;)
                           ", "*        |insert ", " to array
                                "};"    |add formatting

Ogromne podziękowania dla Martina Endera za ulepszenia mojej pierwszej odpowiedzi CJam.

JavaScript (ES6), 65 64 63 bajtów

s=>`${s.split`[`[0]}[] = {${s.match(/-?\d+(?=;)/g).join`, `}};`

Siatkówka , 30 28 bajtów

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

\d+];¶.+ 
] = {
;¶.+=
,
;
};

Wypróbuj online!

Wyjaśnienie

Jako przykład wykorzystamy następujące dane wejściowe:

spam eggs[4];
eggs[0] = 0;
eggs[1] = 4;
eggs[2] = 8;
eggs[3] = -3;

Scena 1

\d+];¶.+ 
] = {

Zauważ, że w pierwszym wierszu jest spacja.

Zaczynamy od dopasowania liczby za ];i linii, a następnie wszystkiego do ostatniego miejsca w następnym wierszu. To dopasowanie można znaleźć tylko na końcu pierwszego wiersza (z powodu ];). Wszystko to zostało zastąpione przez ] = {. Oznacza to, że przekształca nasze przykładowe dane wejściowe na:

spam eggs[] = {0;
eggs[1] = 4;
eggs[2] = 8;
eggs[3] = -3;

Etap 2

;¶.+=
,

Teraz możemy dopasować wszystko od ;góry do =następnego wiersza i zastąpić ,. To przekształca ciąg do:

spam eggs[] = {0, 4, 8, -3;

Etap 3

;
};

Wszystko, co pozostało jest ustalenie końca i robimy to poprzez zastąpienie jedyne ;z };:

spam eggs[] = {0, 4, 8, -3};

Julia, 112 108 105 bajtów

f(s)=string(split(s,'[')[1],"[] = {",join([m[1] for m in [eachmatch(r"= *(-?\d+)",s)...]],", "),"};")

Wyjaśnienie

string(                                                         # build output string
split(s,'[')[1],                                                # get declaration (e.g. spam eggs)
"[] = {",                                                       # add [] = {
join(                                                           # collect numbers
    [m[1] for m in [eachmatch(r"= *(-?\d+)",s)...]],            # regex out (signed) numbers
    ", "),                                                      # and join comma separated
"};"                                                            # add };
)                                                               # close string(

Zapisane bajty poprzez zastąpienie metody collect (eachmatch ()) wartością [eachmatch () ...] i krótszym wyrażeniem regularnym

Lua, 121 bajtów.

function g(s)print(s:gmatch('.-%[')()..'] = {'..s:gsub('.-\n','',1):gsub('.-([%d.-]+);\n?','%1, '):gsub(',%s+$','};'))end

Wyjaśnił

function g(s)
    print(                              -- Print, Self Explaintry.
        s:gmatch('.-%[')()..'] = {'     -- Find the 'header', match the first line's class and assignment name (everything up to the 'n]') and append that. Then, append ] = {.
                                        -- In the eggs example, this looks like; 'spam eggs[] = {' now
        ..                              -- concatenate...
        s:gsub('.-\n','',1)             -- the input, with the first line removed.
        :gsub('.-([%d.-]+);\n?','%1, ') -- Then that chunk is searched, quite boringly, a number followed by a semicolon, and the entire string is replaced with an array of those,
                                        -- EG, '1, 2, 3, 4, 5, 6, '
        :gsub(',%s+$','};')          -- Replace the final ', ' (if any) with a single '};', finishing our terrifying combination
    )
end

Partia, 160 bajtów

@echo off
set/ps=
set s=%s:[=[] = {&rem %
set r=
:l
set t=
set/pt=
if "%t%"=="" echo %r%};&exit/b
set t=%t:* =%
set r=%r%%s%%t:~2,-1%
set s=, 
goto l

Uwaga: linia set s=,kończy się spacją. Pobiera dane wejściowe na STDIN. Ta dziwna linia 3 pobiera dane wejściowe (np. int spam[6];I zmienia wynik na, [w [] = {&remwyniku set s=int spam[] = {&rem 6];którego następnie interpretowane są jako dwie instrukcje, set s=int spam[] = {a rem 6];ta ostatnia jest komentarzem. Następnie dla każdej linii usuwamy tekst do pierwszej spacji (ponieważ możesz użyj =wzorca, a dopasowanie nie jest zachłanne) i wyodrębnij wartość.

C, 121 bajtów

n=2;main(i){for(;putchar(getchar())^91;);for(printf("] = {");~scanf("%*[^=]%*c%d",&i);n=0)printf(", %d"+n,i);puts("};");}

Python 112 111

Dla mnie bardzo proste, proszę zasugerować wszelkie usprawnienia, które przychodzą mi do głowy.

def f(l):
 a,*b=l.split('\n')
 return a[:a.index('[')]+'[] = {'+', '.join(r.split(' = ')[1][:-1]for r in b)+'};'


# TEST

lines = """spam eggs[10];
eggs[0] = 0;
eggs[1] = 4;
eggs[2] = 8;
eggs[3] = -3;
eggs[4] = 3;
eggs[5] = 7;
eggs[6] = 888;
eggs[7] = 555;
eggs[8] = 0;
eggs[9] = -2;"""
print (f(lines))
assert f(lines) == 'spam eggs[] = {0, 4, 8, -3, 3, 7, 888, 555, 0, -2};'

05AB1E , 31 30 28 bajtów

žh-|vy#¤¨ˆ\}¨… = ¯ïžuDÀÀ‡';J

Wyjaśnienie

žh-¨                            # remove numbers and ";" from first input
    |v      }                   # for each of the rest of the inputs
      y#                        # split on spaces
        ¤¨                      # take the last element (number) minus the last char (";") 
          ˆ\                    # store in global array and throw the rest of the list away
             … =                # push the string " = "
                 ¯ï             # push global array and convert to int
                   žuDÀÀ‡       # replace square brackets of array with curly ones
                         ';     # push ";"
                           J    # join everything and display

Wypróbuj online!

Oszczędność bajtu dzięki Adnanowi

Java 7, 159 158 149 154 bajtów

String c(String[]a){a[0]=a[0].split("\\d")[0]+"] = {\b";for(String i:a)a[0]+=i.split("= [{]*")[1];return a[0].replace(";",", ").replaceFirst("..$","};");}

Wiele bajtów zapisanych dzięki @cliffroot .

Kod niepoznany i testowy:

Wypróbuj tutaj.

class M{
  static String c(String[] a){
    a[0] = a[0].split("\\d")[0] + "] = {\b";
    for(String i : a){
      a[0] += i.split("= [{]*")[1];
    }
    return a[0].replace(";", ", ").replaceFirst("..$", "};");
  }

  public static void main(String[] a){
    System.out.println(c(new String[]{ "spam eggs[10];", "eggs[0] = 0;", "eggs[1] = 4;",
      "eggs[2] = 8;", "eggs[3] = -3;", "eggs[4] = 3;", "eggs[5] = 7;", "eggs[6] = 888;",
      "eggs[7] = 555;", "eggs[8] = 0;", "eggs[9] = -2;" }));
    System.out.println(c(new String[]{ "char ans[2]", "ans[0] = 52;", "ans[1] = 50;" }));
    System.out.println(c(new String[]{ "blah_blah quux[1];", "quux[0] = 105;" }));
  }
}

Wydajność:

spam eggs[] = {0, 4, 8, -3, 3, 7, 888, 555, 0, -2};
char ans[] = {52, 50};
blah_blah quux[] = {105};

Perl, 42 + 2 (-0p ) = 44 bajty

s%\d+].*%] = {@{[join",",/(-?\d+);/g]}};%s

Potrzebuje -pi -0flagi do uruchomienia. Na przykład :

perl -0pe 's%\d+].*%] = {@{[join",",/(-?\d+);/g]}};%s' <<< "blah_blah quux[1];
quux[0] = 105;"

Galaretka , 27 bajtów

Ỵ©ḢḟØDṖ“ = {”®Ḳ€Ṫ€Ṗ€j⁾, ⁾};

Wypróbuj online!

Wyjaśnienie

Ỵ         Split into lines
 ©Ḣ       Take the first one, store the others in ®
   ḟØD    Remove digits
      Ṗ   Remove trailing ;

“ = {”    Print a literal string

®         Recall the remaining lines
 Ḳ€       Split each into words
   Ṫ€     Keep each last word
     Ṗ€   Remove each trailing ;

j⁾,       Join by “, ”
    ⁾};   Literal “};”

sed 51

1s,\[.*,[] = {,
:
N
s,\n.*= ,,
s/;/, /
$s/, $/};/
t

Java, 106 bajtów

Jak zwykle manipulowanie ciągami w Javie to piekło.

a->a[0].join("",a).replaceAll(";\\w+\\[\\d+\\] = ",", ").replaceAll("\\d+\\], ","] = {").replace(";","};")

To jest czysta odpowiedź regularna. Zrób pojedynczy konkatenowany String, a następnie wykonaj, replaceXxxaż będzie w porządku.

Testowanie i niestosowanie:

import java.util.function.Function;

public class Main {

  public static void main(String[] args) {
    Function<String[], String> f = a ->
        String.join("", a)                          // I think this would join. Not sure, though. Golfed into a[0].join because static members are accessible from instances.
            .replaceAll(";\\w+\\[\\d+\\] = ", ", ") // replace with regex
            .replaceAll("\\d+\\], ", "] = {")       // replace with regex
            .replace(";", "};");                    // replace no regex

    String[] spam = {
      "int spam[6];",
      "spam[0] = 4;",
      "spam[1] = 8;",
      "spam[2] = 15;",
      "spam[3] = 16;",
      "spam[4] = 23;",
      "spam[5] = 42;"
    };
    test(f, spam, "int spam[] = {4, 8, 15, 16, 23, 42};");

    String[] eggs = {
      "spam eggs[10];",
      "eggs[0] = 0;",
      "eggs[1] = 4;",
      "eggs[2] = 8;",
      "eggs[3] = -3;",
      "eggs[4] = 3;",
      "eggs[5] = 7;",
      "eggs[6] = 888;",
      "eggs[7] = 555;",
      "eggs[8] = 0;",
      "eggs[9] = -2;"
    };
    test(f, eggs, "spam eggs[] = {0, 4, 8, -3, 3, 7, 888, 555, 0, -2};");

    String[] ans = {
      "char ans[2];",
      "ans[0] = 52;",
      "ans[1] = 50;"
    };
    test(f, ans, "char ans[] = {52, 50};");

    String[] quux = {
      "blah_blah quux[1];",
      "quux[0] = 105;"
    };
    test(f, quux, "blah_blah quux[] = {105};");

  }

  static void test(Function<String[], String> f, String[] input, String expected) {
    System.out.printf("Result:   %s%nExpected: %s%n", f.apply(input), expected);
  }
}

Galaretka , 33 bajty

ỴḊḲ€Ṫ€K⁾;,yṖ“{“};”j
ỴḢḟØDṖ,⁾ =,ÇK

TryItOnline

W jaki sposób?

ỴḊḲ€Ṫ€K⁾;,yṖ“{“};”j - Link 1, parse and reform the values, same input as the Main link
Ỵ                   - split on line feeds
 Ḋ                  - dequeue (remove the first line)
  Ḳ€                - split each on spaces
    Ṫ€              - tail each (get the numbers with trailing ';')
      K             - join on spaces
       ⁾;,          - ";,"
          y         - map (replace ';' with ',')
           Ṗ        - pop (remove the last ',')
            “{“};”  - list of strings ["{","};"]
                  j - join (making "{" + "n0, n1, ,n2, ..." + "};")

ỴḢḟØDṖ,⁾ =,ÇK - Main link, takes one argument, the multiline string
Ỵ             - split on line feeds
 Ḣ            - head (just the first line)
   ØD         - digits yield "0123456789"
  ḟ           - filter out
     Ṗ        - pop (remove the trailing ';')
      ,   ,   - pair
       ⁾ =    - the string " ="
           Ç  - call the previous Link (1)
            K - join on spaces (add the space after the '=')

Rubinowy, 64 bajty

->{gets.split(?[)[0]+"[]={"+$<.map{|s|s.scan /\ -?\d+/}*?,+"};"}

JavaScript, 125 bajtów

Wiem, że jest dłuższy niż inne, ale naprawdę chciałem go użyć eval . Dla żartu.

f=function(s){m=/^(\w+ )(\w+).*?(;.*)/.exec(s)
eval("var "+m[2]+"=new Array()"+m[3]+'alert(m[1]+m[2]+"={"+eval(m[2])+"};")')}

Aby uruchomić, wklej tutaj :

s='int spam[6];\
spam[0] = 4;\
spam[1] = 8;\
spam[2] = 15;\
spam[3] = 16;\
spam[4] = 23;\
spam[5] = 42;'
f=function(s){m=/^(\w+ )(\w+).*?(;.*)/.exec(s)
eval("var "+m[2]+"=new Array()"+m[3]+'alert(m[1]+m[2]+"={"+eval(m[2])+"};")')}
f(s)

Haxe, 234 bajty

function R(L:Array<String>){var S=L[0];var W=S.indexOf(" ");var T=S.substr(0,W),M=S.substring(W+1,S.indexOf("["));var r=[for(i in 1...L.length)L[i].substring(L[i].lastIndexOf(" ")+1,L[i].length-1)].join(', ');return'$T $M[] = {$r};';}

Długie nazwy funkcji zabiły to: D

Wypróbuj testcases tutaj !

V , 25 , 24 bajtów

3wC] = {òJd2f $s, òhC};

Wypróbuj online! Zawiera on <esc>znak, którego nie można wydrukować , więc oto zrzut heksowy:

0000000: 3377 435d 203d 207b 1bf2 4a64 3266 2024  3wC] = {..Jd2f $
0000010: 732c 20f2 6843 7d3b                      s, .hC};

Wyjaśnienie:

3w                              "Move forward 3 words
  C     <esc>                   "Delete everything until the end of the line, and enter this text:
   ] = {                        "'] = {'
             ò         ò        "Recursively:
              J                 "  Join these two lines (which enters a space)
               d                "  Delete everything until you
                2f              "  (f)ind the (2)nd space
                   $            "  Move to the end of this line
                    s           "  Delete a character, and enter:
                     ,          "  ', '
                                "
                        h       "Move one character to the left
                         C      "Delete everything until the end of the line, and enter this text:
                          };    "'};'