Джимми эти массивы вниз


23

Мой коллега, Джимми , немного новичок в C / C ++. Он также немного медленный ученик. Теперь, чтобы быть справедливым, его код всегда компилируется, но у него есть некоторые действительно небрежные привычки. Например, все знают, что вы можете определить массив следующим образом:

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

Все, кроме Джимми. Он убежден, что единственный способ создать массив - это так:

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

Я продолжаю исправлять это для него в обзоре кода, но он не научится. Поэтому мне нужно, чтобы вы написали инструмент, который автоматически делает это для него, когда он совершает коммит ».

Соревнование

Я хочу, чтобы вы написали либо полную программу, либо функцию, которая принимает многострочную строку в качестве входных данных и выводит более компактную версию массива C. Ввод всегда будет следовать этому формату, включая пробелы:

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;

Короче говоря, ввод всегда будет действительным и четко определенным C. Более подробно:

Все идентификаторы будут состоять только из букв и подчеркиваний. Длина всегда будет по крайней мере одна, и никогда не будет отсутствующих или выходящих за пределы индексов. Вы также можете предположить, что индексы в порядке. Например:

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

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

а также

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

все недопустимые данные и могут привести к неопределенному поведению в вашей заявке. Вы также можете предположить, что все числа будут действительными десятичными числами, отрицательными или положительными. На входе не будет посторонних пробелов. Вывод должен всегда следовать этому формату, включая пробелы:

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

Вот некоторые примеры данных:

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};

Вы можете осуществлять ввод и вывод в любом приемлемом формате, таком как STDIN / STDOUT, аргументы функций и возвращаемое значение, чтение и запись файлов и т. Д. Применяются стандартные лазейки. Самый короткий ответ в байтах побеждает!


«Это пассивно-агрессивная и ужасная идея. Вы не получили эту идею от меня.


8
Мои извинения Джимми
DJMcMayhem


@DLosc Ах, это то, что Джимми использует в своем сценарии предварительной фиксации!
Берги

9
Конечно, этот Джимми не гольфист кода.
jimmy23013

Этот вызов действительно зашумил моих Джимми .
DanTheMan

Ответы:


8

Вим, 43 36 байт

Вам не нужно давать Джимми сценарий, просто научите его пользоваться подходящим текстовым редактором. (буквальное возвращение для ясности)

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

Ницца! В данном конкретном случае <C-a>он короче t], что является забавным небольшим взломом. Кроме того, я думаю, что вам технически нужно 2, <cr>так как он запрашивает подтверждение.
DJMcMayhem


Кроме того, norm df=корочеs/.*=//g
DJMcMayhem

1
Также 3wC] = {<esc>короче чем <C-a>di]$s = {<esc>.
DJMcMayhem

1
@Geobits Где твой ответ Emacs?
Нил

7

CJam, 43 36 байт

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

Пример в Интернете

Объяснение:

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

Большое спасибо Martin Ender за улучшения моего первого ответа CJam.


6

JavaScript (ES6), 65 64 63 байта

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

5

Сетчатка , 30 28 байт

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

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

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

объяснение

Мы будем использовать следующий вход в качестве примера:

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

Этап 1

\d+];¶.+ 
] = {

Обратите внимание, что в первой строке есть пробел.

Мы начинаем с сопоставления числа, следующего за ];и перевода строки, а затем всего до последнего пробела на следующей строке. Это совпадение можно найти только в конце первой строки (из-за ];). Все это заменено на ] = {. То есть он преобразует входные данные нашего примера в:

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

Этап 2

;¶.+=
,

Теперь мы сопоставляем все от a ;до до =на следующей строке и заменяем на a ,. Это преобразует строку в:

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

Этап 3

;
};

Все, что осталось, это исправить конец, и мы сделаем это, заменив оставшееся ;на };:

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

5

Юлия, 112 108 105 Байт

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

объяснение

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(

Сохраненные байты, заменяя метод collect (eachmatch ()) на [eachmatch () ...] и с более коротким регулярным выражением


Привет, добро пожаловать в PPCG! Это выглядит как отличный первый ответ. +1 от меня. Поскольку задача гласит: « Вы можете использовать ввод и вывод в любом приемлемом формате », вы можете удалить пробел после разделителя запятых в eachmatchвызове функции для менее привлекательного вывода и -1 байта. Я никогда не программировал на Джулию, но вам может быть интересно прочитать этот пост: Советы по игре в гольф в Джулии . Снова добро пожаловать, и приятного пребывания. :)
Кевин Круйссен

1
Большое спасибо за ваши добрые слова :) Кажется, PPCG было интересно изучить, поэтому я решил попробовать. Выбрал Юлию для этого ответа, так как его еще не было
nyro_0

Использование matchall, вероятно, будет короче, чем брызги eachmatch.
Алекс А.

Сначала я попытался использовать matchall, но он не позволяет мне использовать группы регулярных выражений (часть в скобках, в которой я особенно заинтересован), а не каждый матч. (или я просто не смог найти его в документации?)
nyro_0

3

Луа, 121 байт.

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

Разъяснения

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

3

Пакетный, 160 байт

@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

Примечание: строка set s=,заканчивается пробелом. Принимает участие в STDIN. Эта странная строка 3 принимает входные данные (например, int spam[6];и изменяет [на [] = {&remрезультат, в set s=int spam[] = {&rem 6];результате чего интерпретируется как два оператора, set s=int spam[] = {а rem 6];последний из них является комментарием. Затем для каждой строки мы удаляем текст до первого пробела (потому что вы можете не использовать =в шаблоне и сопоставление не является жадным) и извлечь значение.


3

C, 121 байт

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

3

Питон 112 111

Очень просто для меня, пожалуйста, предложите любое улучшение, которое приходит на ум.

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};'

При быстром взгляде я вижу, что есть бесполезные пробелы в [:-1] for.
Yytsi

2

05AB1E , 31 30 28 байтов

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

объяснение

ž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

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

Сохранил байт благодаря Аднану


žuDÀÀвместо того, чтобы „[]„{}сохранить байт :).
Аднан

@Adnan: Хорошо, хороший улов!
Эминья

2

Ява 7, 159 158 149 154 байта

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("..$","};");}

Несколько байтов сохранены благодаря @cliffroot .

Ungolfed & тестовый код:

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

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

Выход:

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

1
сохранено несколько байтов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(".$","};");}
Cliffroot

@cliffroot Спасибо! В самом деле, некоторые полезные приемы, такие как повторное использование параметра Stringin и замена последнего символа "};");вместо вместо "")+"};";.
Кевин Круйссен

2

Perl, 42 + 2 ( -0p) = 44 байта

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

Необходимо -pи -0флаги для запуска. Например :

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

1

Желе , 27 байт

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

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

объяснение

Ỵ         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 “};”


1

Java, 106 байт

Манипулирование строками в Java - это ад, как всегда.

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

Это чистый регулярный ответ. Сделайте один сцепленный String, затем выполните, replaceXxxпока это не хорошо.

Тестирование и разгула

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);
  }
}

0

Желе , 33 байта

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

TryItOnline

Как?

ỴḊḲ€Ṫ€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 '=')

Избиратель - что с ним не так?
Джонатан Аллан


0

JavaScript, 125 байт

Я знаю, что это дольше, чем другие, но я действительно хотел использовать eval. Просто для удовольствия.

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

Чтобы запустить, вставьте сюда следующее :

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)

0

Haxe, 234 байта

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

Попробуйте тестовые примеры здесь !


0

V , 25 , 24 байта

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

Попробуйте онлайн! Это содержит непечатаемый <esc>символ, поэтому вот hexdump:

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

Объяснение:

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:
                          };    "'};'
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.