#include <sstream>
#include <cmath>
-#include "Parser.hpp"
-#include "Cycript.tab.hh"
-
#include "Error.hpp"
-#include "String.hpp"
#include "Execute.hpp"
-#include "JavaScript.hpp"
+#include "Parser.hpp"
+#include "String.hpp"
+
+#include "Cycript.tab.hh"
+#include "Driver.hpp"
#include "ConvertUTF.h"
return CYCastDouble(value, strlen(value));
}
-size_t CYArrayLength(JSContextRef context, JSObjectRef array) {
- return CYCastDouble(context, CYGetProperty(context, array, length_s));
-}
-
-JSValueRef CYArrayGet(JSContextRef context, JSObjectRef array, size_t index) {
- JSValueRef exception(NULL);
- JSValueRef value(JSObjectGetPropertyAtIndex(context, array, index, &exception));
- CYThrow(context, exception);
- return value;
-}
-
-void CYArrayPush(JSContextRef context, JSObjectRef array, JSValueRef value) {
- JSValueRef exception(NULL);
- JSValueRef arguments[1];
- arguments[0] = value;
- JSObjectRef Array(CYGetCachedObject(context, CYJSString("Array_prototype")));
- JSObjectCallAsFunction(context, CYCastJSObject(context, CYGetProperty(context, Array, push_s)), array, 1, arguments, &exception);
- CYThrow(context, exception);
-}
-
-extern "C" void CydgetMemoryParse(const uint16_t **data, size_t *size) {
+CYUTF8String CYPoolCode(CYPool &pool, CYUTF8String code) {
CYLocalPool local;
-
- CYUTF8String utf8(CYPoolUTF8String(local, CYUTF16String(*data, *size)));
- CYStream stream(utf8.data, utf8.data + utf8.size);
+ CYStream stream(code.data, code.data + code.size);
CYDriver driver(stream);
cy::parser parser(driver);
- if (parser.parse() != 0 || !driver.errors_.empty())
- return;
+ _assert(parser.parse() == 0);
+ _assert(driver.errors_.empty());
CYOptions options;
CYContext context(options);
driver.program_->Replace(context);
+
std::ostringstream str;
CYOutput out(str, options);
out << *driver.program_;
- std::string code(str.str());
-
- CYPool pool;
- CYUTF16String utf16(CYPoolUTF16String(pool, CYUTF8String(code.c_str(), code.size())));
-
- size_t bytes(utf16.size * sizeof(uint16_t));
- uint16_t *copy(reinterpret_cast<uint16_t *>(malloc(bytes)));
- memcpy(copy, utf16.data, bytes);
-
- *data = copy;
- *size = utf16.size;
+ return $pool.strdup(str.str().c_str());
}
CYPool &CYGetGlobalPool() {