"abcd"

{'a', 'b', 'c', 'd'}

...И я вспомнил Четырнадцатый том сочинений Боконона — прошлой
ночью я его прочел весь целиком. Четырнадцатый том озаглавлен
так:
"Может ли разумный человек, учитывая опыт прошедших веков,
питать хоть малейшую надежду на светлое будущее человечества?"
Прочесть Четырнадцатый том недолго. Он состоит всего из
одного слова и точки: "Нет".

MS> Я же говорил, что сишний препроцессор — отстой. И его не исправить никакими бустами. Нужна новая концепция, причем, лучше бы — не "препроцессора", а просто макро-процессора, встроенного в компилятор.

#include <iostream>

#include <boost/preprocessor/repetition/enum.hpp>

#define UNWIND_STR_PARAM(Z, N, STR) ((N>sizeof(STR))?'\0':STR[N])

#define UNWIND_STR_MAX_LEN 80

#define UNWIND_STR(STR) \
    { BOOST_PP_ENUM(80, UNWIND_STR_PARAM, STR) }

char s[]=UNWIND_STR("abcd");

int main() {
    std::cout<<s<<std::endl; 
    return 0;
}

"abcd"

{'a', 'b', 'c', 'd'}

char s[]="abcd";

char s[]=UNWIND_STR("abcd");

Y>#include <iostream>

Y>#include <boost/preprocessor/repetition/enum.hpp>

Y>#define UNWIND_STR_PARAM(Z, N, STR) ((N>sizeof(STR))?'\0':STR[N])

Y>#define UNWIND_STR_MAX_LEN 80

Y>#define UNWIND_STR(STR) \
Y>    { BOOST_PP_ENUM(80, UNWIND_STR_PARAM, STR) }

Y>char s[]=UNWIND_STR("abcd");

Y>int main() {
Y>    std::cout<<s<<std::endl; 
Y>    return 0;
Y>}
Y>

Y>так что кричать "препроцессор — отстой" пока рано

"abcd"

{'a', 'b', 'c', 'd'}

L>Даже если свести линковщиков в одну строку, все равно открыто.

# --- encode.pl ------------------------

sub myencode(@) {
    return ord($_[0])^0xFF;
}

open(F,$ARGV[0]) || die;
open(Fo,'>'.$ARGV[1]);
$src="";
$dst="";
while ($line=<F>) {
    $src.=$line;
    if ($line=~/(.*)__XOR_STR\(\"(.*)\"\)(.*)/) {
        $res="";
        for ($i=0; $i<length($2); ++$i) {
            $res.="," if ($i>0);
            $res.=myencode(substr($2, $i, 1));
        }
        $dst.="$1\{".$res."\}$3";
    } else {
        $dst.=$line;
    }
}
print Fo $dst;
close(F);
close(Fo);

perl encode.pl input.cpp output.cpp

char s[]=__XOR_STR("abcd");

char s[]={158,157,156,155};

CS>char s[]="abcd";
CS>

CS>char s[]=UNWIND_STR("abcd");
CS>

int s[]=UNWIND_STR("abcd");