Smoke logs available at http://m-l.org/~perl/smoke/perl/
Automated smoke report for 5.17.0 patch
74b9dba3fd4970da0ac1d65c84211e5c4aa7a7b1 v5.16.0-151-g74b9dba
zwei: Intel(R) Core(TM) i7 CPU 920 @ 2.67GHz (GenuineIntel 2668MHz) (x86_64/8
cpu)
on linux - 3.2.0-24-generic [debian]
using g++ version 4.6.3
smoketime 49 minutes 45 seconds (average 12 minutes 26 seconds)
Summary: PASS
O = OK F = Failure(s), extended report at the bottom
X = Failure(s) under TEST but not under harness
? = still running or test results not (yet) available
Build failures during: - = unknown or N/A
c = Configure, m = make, M = make (after miniperl), t = make test-prep
v5.16.0-151-g74b9dba Configuration (common) -Accflags=-DPERL_POISON -Dcc=g++
----------- ---------------------------------------------------------
O O O O
O O O O -Duseithreads
| +--------- -DDEBUGGING
+----------- no debugging
Locally applied patches:
uncommitted-changes
SMOKE74b9dba3fd4970da0ac1d65c84211e5c4aa7a7b1
Testsuite was run only with 'harness'
Passed Todo tests: (common-args) -Accflags=-DPERL_POISON -Dcc=g++
[default]
[default] -DDEBUGGING
[default] -Duseithreads
[default] -DDEBUGGING -Duseithreads
../cpan/CGI/t/tmpdir.t......................................PASSED
3-9
Compiler messages(gcc):
try.c: In function ‘int main()’:
try.c:36:10: warning: ignoring return value of ‘int pipe(int*)’, declared with
attribute warn_unused_result [-Wunused-result]
try.c:37:10: warning: ignoring return value of ‘int pipe(int*)’, declared with
attribute warn_unused_result [-Wunused-result]
try.c:53:35: warning: ignoring return value of ‘ssize_t write(int, const void*,
size_t)’, declared with attribute warn_unused_result [-Wunused-result]
try.c:66:23: warning: ignoring return value of ‘ssize_t write(int, const void*,
size_t)’, declared with attribute warn_unused_result [-Wunused-result]
try.c:72:35: warning: ignoring return value of ‘ssize_t write(int, const void*,
size_t)’, declared with attribute warn_unused_result [-Wunused-result]
try.c:78:21: warning: ignoring return value of ‘ssize_t read(int, void*,
size_t)’, declared with attribute warn_unused_result [-Wunused-result]
try.c: In function ‘int main(int, char**)’:
try.c:22:14: error: ‘KERN_PROC’ was not declared in this scope
try.c:23:14: error: ‘KERN_PROC_PATHNAME’ was not declared in this scope
try.c:48:25: error: invalid conversion from ‘void*’ to ‘char*’ [-fpermissive]
try.c:5785:17: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5788:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5791:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5794:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5821:17: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5824:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5827:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5830:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5857:17: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5860:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5863:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5866:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5893:16: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5896:17: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5899:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5902:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5929:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5932:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5935:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:5938:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6817:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6820:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6823:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6826:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6853:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6856:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6859:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6862:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6889:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6892:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6895:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6898:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6925:17: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6928:18: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6931:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6934:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6961:19: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6964:20: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6967:21: warning: extra tokens at end of #ifdef directive [enabled by
default]
try.c:6970:21: warning: extra tokens at end of #ifdef directive [enabled by
default]
util.c: In function ‘char* S_write_no_mem()’:
util.c:68:34: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
regexec.c: In function ‘char* S_find_byclass(regexp*, const regnode*, char*,
const char*, regmatch_info*)’:
regexec.c:1604:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1610:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1615:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1625:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1635:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1640:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1651:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1658:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1670:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1677:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1696:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1703:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1721:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1728:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1747:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:1765:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
perlio.c: In function ‘void S_more_refcounted_fds(int)’:
perlio.c:2355:38: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
doio.c: In function ‘void S_exec_failed(const char*, int, int)’:
doio.c:1374:43: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
doio.c: In function ‘PerlIOl** Perl_nextargv(GV*)’:
doio.c:872:46: warning: ignoring return value of ‘int fchown(int, __uid_t,
__gid_t)’, declared with attribute warn_unused_result [-Wunused-result]
perlio.c: In function ‘void PerlIO_debug(const char*, ...)’:
perlio.c:493:43: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
regexec.c: In function ‘I32 S_regmatch(regmatch_info*, regnode*)’:
regexec.c:3795:7: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3871:9: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3875:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3877:9: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
pp_ctl.c: In function ‘OP* Perl_pp_goto()’:
pp_ctl.c:2966:8: warning: variable ‘newsp’ set but not used
[-Wunused-but-set-variable]
pp_ctl.c:2967:7: warning: variable ‘gimme’ set but not used
[-Wunused-but-set-variable]
regexec.c:3881:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3883:9: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3886:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3971:7: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3971:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:3971:1: warning: variable ‘throw_away’ set but not used
[-Wunused-but-set-variable]
mg_vtable.h:95:54: warning: ‘PL_magic_vtable_names’ initialized and declared
‘extern’ [enabled by default]
regexec.c: In function ‘I32 S_regrepeat(const regexp*, const regnode*, I32,
int)’:
regexec.c:6155:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6200:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6252:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6301:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6354:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6387:6: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
sv.c: In function ‘void Perl_sv_vcatpvfn(SV*, const char*, STRLEN,
__va_list_tag (*)[1], SV**, I32, bool*)’:
sv.c:10119:41: warning: ignoring return value of ‘char* gcvt(double, int,
char*)’, declared with attribute warn_unused_result [-Wunused-result]
sv.c:10968:53: warning: ignoring return value of ‘char* gcvt(double, int,
char*)’, declared with attribute warn_unused_result [-Wunused-result]
sv.c: In function ‘char* Perl_sv_2pv_flags(SV*, STRLEN*, I32)’:
sv.c:2750:39: warning: ignoring return value of ‘char* gcvt(double, int,
char*)’, declared with attribute warn_unused_result [-Wunused-result]
sv.c:2942:39: warning: ignoring return value of ‘char* gcvt(double, int,
char*)’, declared with attribute warn_unused_result [-Wunused-result]
regcomp.c: In function ‘regnode* S_regclass(RExC_state_t*, U32)’:
regcomp.c:10944:7: warning: ignoring return value of ‘regex_charset
get_regex_charset(U32)’, declared with attribute warn_unused_result
[-Wunused-result]
sdbm.c: In function ‘int makroom(DBM*, long int, int)’:
sdbm.c:371:70: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
Call.xs: In function ‘I32 filter_call(int, SV*, int)’:
Call.xs:63:58: warning: format ‘%d’ expects argument of type ‘int’, but
argument 3 has type ‘STRLEN {aka long unsigned int}’ [-Wformat]
Call.xs:63:58: warning: format ‘%d’ expects argument of type ‘int’, but
argument 5 has type ‘STRLEN {aka long unsigned int}’ [-Wformat]
Call.xs:100:41: warning: format ‘%d’ expects argument of type ‘int’, but
argument 4 has type ‘STRLEN {aka long unsigned int}’ [-Wformat]
Call.xs:156:38: warning: format ‘%d’ expects argument of type ‘int’, but
argument 3 has type ‘STRLEN {aka long unsigned int}’ [-Wformat]
Call.xs:175:51: warning: format ‘%d’ expects argument of type ‘int’, but
argument 4 has type ‘long unsigned int’ [-Wformat]
re_comp.c: In function ‘regnode* S_regclass(RExC_state_t*, U32)’:
re_comp.c:10944:7: warning: ignoring return value of ‘regex_charset
get_regex_charset(U32)’, declared with attribute warn_unused_result
[-Wunused-result]
regcomp.c: In function ‘void S_dump_trie(const _reg_trie_data*, HV*, AV*, U32)’:
regcomp.c:1045:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘void S_dump_trie_interim_list(const _reg_trie_data*,
HV*, AV*, U32, U32)’:
regcomp.c:1136:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘void S_dump_trie_interim_table(const _reg_trie_data*,
HV*, AV*, U32, U32)’:
regcomp.c:1194:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘REGEXP* Perl_re_compile(SV*, U32)’:
regcomp.c:5734:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘SV* Perl_reg_named_buff_nextkey(REGEXP*, U32)’:
regcomp.c:5884:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘void Perl_pregfree2(REGEXP*)’:
regcomp.c:12686:5: warning: variable ‘re_debug_flags’ set but not used
[-Wunused-but-set-variable]
sv.c: In function ‘DIR* Perl_dirp_dup(PerlInterpreter*, DIR*, CLONE_PARAMS*)’:
sv.c:11415:26: warning: ignoring return value of ‘int fchdir(int)’, declared
with attribute warn_unused_result [-Wunused-result]
sv.c: In function ‘void Perl_sv_vcatpvfn(PerlInterpreter*, SV*, const char*,
STRLEN, __va_list_tag (*)[1], SV**, I32, bool*)’:
sv.c: In function ‘char* Perl_sv_2pv_flags(PerlInterpreter*, SV*, STRLEN*,
I32)’:
perl.c: In function ‘void S_init_tls_and_interp(PerlInterpreter*)’:
perl.c:103:2: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
perlio.c: In function ‘void S_more_refcounted_fds(PerlInterpreter*, int)’:
doio.c: In function ‘void S_exec_failed(PerlInterpreter*, const char*, int,
int)’:
doio.c: In function ‘PerlIOl** Perl_nextargv(PerlInterpreter*, GV*)’:
regexec.c: In function ‘char* S_find_byclass(PerlInterpreter*, regexp*, const
regnode*, char*, const char*, regmatch_info*)’:
perlio.c:484:56: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
regexec.c: In function ‘I32 S_regmatch(PerlInterpreter*, regmatch_info*,
regnode*)’:
regexec.c:3795:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
pp_ctl.c: In function ‘OP* Perl_pp_goto(PerlInterpreter*)’:
util.c: In function ‘char* S_write_no_mem(PerlInterpreter*)’:
regexec.c: In function ‘I32 S_regrepeat(PerlInterpreter*, const regexp*, const
regnode*, I32, int)’:
regexec.c:6155:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6200:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6252:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6301:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6354:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regexec.c:6387:1: warning: variable ‘ok’ set but not used
[-Wunused-but-set-variable]
regcomp.c: In function ‘regnode* S_regclass(PerlInterpreter*, RExC_state_t*,
U32)’:
Call.xs: In function ‘I32 filter_call(PerlInterpreter*, int, SV*, int)’:
shared.xs: In function ‘user_lock* S_get_userlock(PerlInterpreter*, SV*, bool)’:
shared.xs:348:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘void S_sharedsv_dec(PerlInterpreter*, SV*)’:
shared.xs:521:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘void Perl_sharedsv_share(PerlInterpreter*, SV*)’:
shared.xs:550:9: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_scalar_mg_get(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:725:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_scalar_mg_set(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:803:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_scalar_mg_free(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:821:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_scalar_mg_local(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:854:9: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_elem_mg_FETCH(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:891:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_elem_mg_STORE(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:944:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘int sharedsv_elem_mg_DELETE(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:986:5: warning: deprecated conversion from string constant to ‘char*’
[-Wwrite-strings]
shared.xs: In function ‘U32 sharedsv_array_mg_FETCHSIZE(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:1049:5: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘int sharedsv_array_mg_CLEAR(PerlInterpreter*, SV*,
MAGIC*)’:
shared.xs:1069:5: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void Perl_sharedsv_lock(PerlInterpreter*, SV*)’:
shared.xs:1173:63: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_PUSH(PerlInterpreter*,
CV*)’:
shared.xs:1269:13: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_UNSHIFT(PerlInterpreter*,
CV*)’:
shared.xs:1286:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_POP(PerlInterpreter*,
CV*)’:
shared.xs:1309:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_SHIFT(PerlInterpreter*,
CV*)’:
shared.xs:1326:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_EXTEND(PerlInterpreter*,
CV*)’:
shared.xs:1342:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void
XS_threads__shared__tie_STORESIZE(PerlInterpreter*, CV*)’:
shared.xs:1352:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_EXISTS(PerlInterpreter*,
CV*)’:
shared.xs:1364:13: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs:1374:13: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_FIRSTKEY(PerlInterpreter*,
CV*)’:
shared.xs:1390:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared__tie_NEXTKEY(PerlInterpreter*,
CV*)’:
shared.xs:1418:9: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
shared.xs: In function ‘void XS_threads__shared_bless(PerlInterpreter*, CV*)’:
shared.xs:1678:13: warning: deprecated conversion from string constant to
‘char*’ [-Wwrite-strings]
threads.xs: In function ‘ithread* S_ithread_create(PerlInterpreter*, SV*, IV,
int, int, int, int)’:
threads.xs:714:83: warning: ignoring return value of ‘ssize_t write(int, const
void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
re_comp.c: In function ‘regnode* S_regclass(PerlInterpreter*, RExC_state_t*,
U32)’:
regcomp.c: In function ‘void S_dump_trie(PerlInterpreter*, const
_reg_trie_data*, HV*, AV*, U32)’:
regcomp.c: In function ‘void S_dump_trie_interim_list(PerlInterpreter*, const
_reg_trie_data*, HV*, AV*, U32, U32)’:
regcomp.c: In function ‘void S_dump_trie_interim_table(PerlInterpreter*, const
_reg_trie_data*, HV*, AV*, U32, U32)’:
regcomp.c: In function ‘REGEXP* Perl_re_compile(PerlInterpreter*, SV*, U32)’:
regcomp.c: In function ‘SV* Perl_reg_named_buff_nextkey(PerlInterpreter*,
REGEXP*, U32)’:
regcomp.c: In function ‘void Perl_pregfree2(PerlInterpreter*, REGEXP*)’:
--
Report by Test::Smoke v1.44 build 1285 running on perl 5.14.2
(Reporter v0.035 / Smoker v0.045)
