generic-library/ChaiScript
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

General cleanup to chaiscript prelude

Browse Source
This commit is contained in:
Jonathan Turner 2009-07-02 18:09:02 +00:00
parent 6ddef8f918
commit 441112648e
1 changed files with 7 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
chaiscript/chaiscript_prelude.hpp
View File

@ -6,15 +6,13 @@
const char *chaiscript_prelude = " \n\ const char *chaiscript_prelude = " \n\
def to_string(x) : call_exists(range, x) { \n\ def to_string(x) : call_exists(range, x) { \n\
var outstr = \"[\" + x.join(\", \") + \"]\"\n\ \"[\" + x.join(\", \") + \"]\"\n\
outstr \n\
}\n\ }\n\
def to_string(x) { \n\ def to_string(x) { \n\
var outstr = x.internal_to_string()\n\ x.internal_to_string()\n\
outstr \n\
}\n\ }\n\
def puts(x) { \n\ def puts(x) { \n\
print_string(x.to_string()) \n\ print_string(x.to_string()) \n\
}; \n\ }; \n\
def print(x) { \n\ def print(x) { \n\
println_string(x.to_string()) \n\ println_string(x.to_string()) \n\
@ -33,16 +31,16 @@ def map(container, func) { \n\
retval.push_back(func(range.front())) \n\ retval.push_back(func(range.front())) \n\
range.pop_front() \n\ range.pop_front() \n\
} \n\ } \n\
return retval \n\ retval \n\
} \n\ } \n\
def reduce(container, func, initial) { \n\ def reduce(container, func, initial) { \n\
var retval = initial \n\ var retval = initial \n\
var range = range(container) \n\ var range = range(container) \n\
while (!range.empty()) { \n\ while (!range.empty()) { \n\
retval = (func(range.front(), retval)) \n\ retval = (func(range.front(), retval)) \n\
range.pop_front() \n\ range.pop_front() \n\
} \n\ } \n\
return retval \n\ retval \n\
} \n\ } \n\
def join(container, delim) { \n\ def join(container, delim) { \n\
var retval = \"\" \n\ var retval = \"\" \n\
@ -56,7 +54,7 @@ def join(container, delim) { \n\
range.pop_front() \n\ range.pop_front() \n\
} \n\ } \n\
} \n\ } \n\
return retval \n\ retval \n\
}"; }";
#endif /* CHAISCRIPT_PRELUDE_HPP_ */ #endif /* CHAISCRIPT_PRELUDE_HPP_ */