Skip to content

Instantly share code, notes, and snippets.

@amirouche

amirouche/out.prettier.js

Created September 2, 2017 13:13
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save amirouche/9c922e34517843edde4b4a6cdaf50a0a to your computer and use it in GitHub Desktop.
Save amirouche/9c922e34517843edde4b4a6cdaf50a0a to your computer and use it in GitHub Desktop.
Download ZIP
Raw
out.prettier.js
This file has been truncated, but you can view the full file.
"use strict";
(function() {
// JavaScript Runtime
// Copyright (C) 2015, 2017 Free Software Foundation, Inc.
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 3 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
// Code:
var scheme = {
obarray: {},
primitives: {},
utils: {},
env: {},
cache: [],
module_cache: {},
builtins: [],
dynstack: [],
// TODO: placeholders
FALSE: false,
TRUE: true,
NIL: false,
EMPTY: [],
UNSPECIFIED: [],
// FIXME: wingo says not to leak undefined to users
UNDEFINED: undefined
};
function not_implemented_yet() {
throw new Error("not implemented yet");
}
function coerce_bool(obj) {
return obj ? scheme.TRUE : scheme.FALSE;
}
// Numbers
scheme.primitives.add = function(x, y) {
return x + y;
};
scheme.primitives.add1 = function(x) {
return x + 1;
};
scheme.primitives["add/immediate"] = function(x, y) {
return x + y;
};
scheme.primitives.sub = function(x, y) {
return x - y;
};
scheme.primitives.sub1 = function(x) {
return x - 1;
};
scheme.primitives["sub/immediate"] = function(x, y) {
return x - y;
};
scheme.primitives.mul = function(x, y) {
return x * y;
};
scheme.primitives.div = function(x, y) {
return x / y;
};
scheme.primitives["="] = function(x, y) {
return coerce_bool(x == y);
};
scheme.primitives["<"] = function(x, y) {
return coerce_bool(x < y);
};
scheme.primitives["<="] = function(x, y) {
return coerce_bool(x <= y);
};
scheme.primitives[">"] = function(x, y) {
return coerce_bool(x > y);
};
scheme.primitives[">="] = function(x, y) {
return coerce_bool(x >= y);
};
scheme.primitives.quo = not_implemented_yet;
scheme.primitives.rem = not_implemented_yet;
scheme.primitives.mod = not_implemented_yet;
// Unboxed Numbers
scheme.primitives["load-u64"] = function(x) {
return x;
};
scheme.primitives["u64-="] = function(x, y) {
return coerce_bool(x === y);
};
scheme.primitives["u64-=-scm"] = function(x, y) {
// i.e. br-if-u64-=-scm
return coerce_bool(x === y);
};
scheme.primitives["u64-<=-scm"] = function(x, y) {
return coerce_bool(x <= y);
};
scheme.primitives["u64-<-scm"] = function(x, y) {
return coerce_bool(x < y);
};
scheme.primitives["u64->-scm"] = function(x, y) {
return coerce_bool(x > y);
};
scheme.primitives["u64->=-scm"] = function(x, y) {
return coerce_bool(x >= y);
};
scheme.primitives["scm->u64"] = function(x) {
return x;
};
scheme.primitives["u64->scm"] = function(x) {
return x;
};
// Boxes
scheme.Box = function(x) {
this.x = x;
return this;
};
scheme.primitives["box"] = function(x) {
return new scheme.Box(x);
};
scheme.primitives["box-ref"] = function(box) {
return box.x;
};
scheme.primitives["box-set!"] = function(box, val) {
box.x = val;
};
// Lists
scheme.Pair = function(car, cdr) {
this.car = car;
this.cdr = cdr;
return this;
};
scheme.primitives["pair?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Pair);
};
scheme.primitives.cons = function(car, cdr) {
return new scheme.Pair(car, cdr);
};
scheme.primitives.car = function(obj) {
return obj.car;
};
scheme.primitives.cdr = function(obj) {
return obj.cdr;
};
scheme.primitives["set-car!"] = function(pair, obj) {
obj.car = obj;
};
scheme.primitives["set-cdr!"] = function(pair, obj) {
obj.cdr = obj;
};
scheme.list = function() {
var l = scheme.EMPTY;
for (var i = arguments.length - 1; i >= 0; i--) {
l = scheme.primitives.cons(arguments[i], l);
}
return l;
};
scheme.primitives["null?"] = function(obj) {
return coerce_bool(scheme.EMPTY == obj);
};
// Symbols
scheme.Symbol = function(s) {
if (scheme.obarray[s]) {
return scheme.obarray[s];
} else {
this.name = s;
scheme.obarray[s] = this;
return this;
}
};
scheme.primitives["symbol?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Symbol);
};
// Keywords
scheme.Keyword = function(s) {
this.name = s;
return this;
};
scheme.primitives["keyword?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Keyword);
};
scheme.utils.keyword_ref = function(kw, args, start, dflt) {
var l = args.length;
if ((l - start) % 2 == 1) {
// FIXME: should error
return undefined;
}
// Need to loop in reverse because last matching keyword wins
for (var i = l - 2; i >= start; i -= 2) {
if (!(args[i] instanceof scheme.Keyword)) {
return undefined;
}
if (args[i].name === kw.name) {
return args[i + 1];
}
}
return dflt;
};
// Vectors
scheme.Vector = function() {
this.array = Array.prototype.slice.call(arguments);
return this;
};
scheme.primitives["vector-ref"] = function(vec, idx) {
return vec.array[idx];
};
scheme.primitives["vector-set!"] = function(vec, idx, obj) {
return (vec.array[idx] = obj);
};
scheme.primitives["vector-length"] = function(vec) {
return vec.array.length;
};
scheme.primitives["vector?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Vector);
};
scheme.primitives["make-vector/immediate"] = function(length, init) {
var v = new scheme.Vector();
var temp = [];
for (var i = 0; i < length; i++) {
temp[i] = init;
}
v.array = temp;
return v;
};
scheme.primitives["vector-set!/immediate"] = scheme.primitives["vector-set!"];
scheme.primitives["vector-ref/immediate"] = scheme.primitives["vector-ref"];
// Bytevectors
// Booleans
scheme.primitives["boolean?"] = not_implemented_yet;
// Chars
scheme.Char = function(c) {
this.c = c;
return this;
};
scheme.primitives["char?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Char);
};
// Strings
scheme.String = function(s) {
this.s = s;
return this;
};
scheme.primitives["string?"] = function(obj) {
return coerce_bool(obj instanceof scheme.String);
};
scheme.primitives["string-length"] = function(str) {
return str.s.length;
};
scheme.primitives["string-ref"] = function(str, idx) {
return new scheme.Char(str.s[idx]);
};
// Closures
scheme.Closure = function(f, size) {
this.fun = f;
this.freevars = new Array(size);
return this;
};
scheme.primitives["free-set!"] = function(closure, idx, obj) {
closure.freevars[idx] = obj;
};
scheme.primitives["free-ref"] = function(closure, idx) {
return closure.freevars[idx];
};
scheme.primitives["builtin-ref"] = function(idx) {
return scheme.builtins[idx];
};
// Syntax Objects
scheme.Syntax = function(expr, wrap, module) {
this.expr = expr;
this.wrap = wrap;
this.module = module;
return this;
};
// Hashtables
scheme.HashTable = function(is_weak) {
// HashTable definition needs to come before scm_pre_modules_obarray
// ignore the is_weak argument, since we can't iterate over js WeakMaps
this.table = new Map(); // WeakMap();
this.lookup = function(obj, dflt) {
if (this.table.has(obj)) {
return this.table.get(obj);
} else {
return dflt;
}
};
this.get = function(key) {
return this.table.get(key);
};
this.set = function(key, obj) {
this.table.set(key, obj);
return obj;
};
this.delete = function(key) {
this.table.delete(key);
return scheme.FALSE; // or handle
};
this.clear = function() {
this.table.clear();
return scheme.UNSPECIFIED;
};
this.keys = function() {
return [...this.table.keys()];
};
return this;
};
// Modules
scheme.primitives["define!"] = function(sym) {
var mod = scm_current_module();
var v = scm_module_ensure_local_variable(mod, sym);
return v;
};
scheme.primitives["cache-current-module!"] = function(module, scope) {
scheme.cache[scope] = module;
};
scheme.primitives["cached-toplevel-box"] = function(scope, sym, is_bound) {
var module = scheme.cache[scope]; // FIXME: what if not there?
if (!scheme.is_true(module)) {
module = scm_the_root_module();
}
var v = scm_module_lookup(module, sym);
if (is_bound) {
// not_implemented_yet();
}
return v;
};
var scm_pre_modules_obarray = new scheme.HashTable();
var the_root_module;
function scm_the_root_module() {
if (module_system_is_booted) return the_root_module.x;
else return scheme.FALSE;
}
scheme.primitives["cached-module-box"] = function(module_name, sym, is_public, is_bound) {
var v;
if (!module_system_is_booted) {
if (module_name instanceof scheme.Pair && module_name.car.name === "guile" && module_name.cdr === scheme.EMPTY) {
v = scm_lookup(sym);
} else {
not_implemented_yet();
}
} else if (sym.name === "equal?") {
// FIXME: this hack exists to work around a miscompilation of
// equal? which is not being handled as a toplevel reference.
// This leads to an infinite loop in the temporary definition of
// resolve-module, which is called by cache-module-box.
v = scm_pre_modules_obarray.get(sym);
} else if (scheme.is_true(is_public)) {
v = scm_public_lookup(module_name, sym);
} else {
v = scm_private_lookup(module_name, sym);
}
if (is_bound) {
// not_implemented_yet();
}
return v;
};
function scm_public_lookup(module_name, name) {
var v = scm_public_variable(module_name, name);
// if false, error
return v;
}
function scm_public_variable(module_name, name) {
var mod = scheme.call(resolve_module_var.x, module_name, k_ensure, scheme.FALSE);
// if (scm_is_false (mod))
// scm_misc_error ("public-lookup", "Module named ~s does not exist",
// scm_list_1 (module_name));
var iface = scm_module_public_interface(mod);
// if (scm_is_false (iface))
// scm_misc_error ("public-lookup", "Module ~s has no public interface",
// scm_list_1 (mod));
return scm_module_variable(iface, name);
}
var module_public_interface_var;
function scm_module_public_interface(module) {
return scheme.call(module_public_interface_var.x, module);
}
function scm_private_lookup(module_name, sym) {
// FIXME: scm_private_variable + miscerror if not bound
return scm_private_variable(module_name, sym);
}
function scm_private_variable(module_name, name) {
var mod = scheme.call(resolve_module_var.x, module_name, k_ensure, scheme.FALSE);
// if (scm_is_false (mod))
// scm_misc_error ("private-lookup", "Module named ~s does not exist",
// scm_list_1 (module_name));
return scm_module_variable(mod, name);
}
scheme.primitives["current-module"] = scm_current_module;
scheme.primitives["resolve"] = function(sym, is_bound) {
var v = scm_lookup(sym);
if (is_bound) {
// not_implemented_yet();
}
return v;
};
function scm_current_module() {
if (module_system_is_booted) {
return the_module.value;
} else {
return scheme.FALSE;
}
}
function scm_lookup(sym) {
return scm_module_lookup(scm_current_module(), sym);
}
scheme.call = function(func) {
var args = Array.prototype.slice.call(arguments, 1);
args.unshift(scheme.initial_cont);
args.unshift(func);
return func.fun.apply(func, args);
};
function scm_module_ensure_local_variable(module, sym) {
if (module_system_is_booted) {
// SCM_VALIDATE_MODULE (1, module);
// SCM_VALIDATE_SYMBOL (2, sym);
// FIXME: this will need a specific continuation
return scheme.call(module_make_local_var_x_var.x, module, sym);
} else {
var box = scm_pre_modules_obarray.lookup(sym, false);
if (box) {
return box;
} else {
var v = new scheme.Box(scheme.UNDEFINED);
scm_pre_modules_obarray.set(sym, v);
return v;
}
}
}
function scm_module_variable(module, sym) {
// if booted, validate module
// validate symbol
if (scheme.is_true(module)) {
// 1. Check Module Obarray
if (module instanceof scheme.Struct) {
var obarray = module.fields[0];
var v = obarray.lookup(sym, scheme.UNDEFINED);
if (v === scheme.UNDEFINED) {
// is_false
// 2. Search among the imported variables
v = module_imported_variable(module, sym);
return v;
// can't be imported
not_implemented_yet();
} else {
return v;
}
}
// 2. Search among the imported variables
// 3. Query the custom binder
// 4. Return False
not_implemented_yet();
}
return scm_pre_modules_obarray.lookup(sym, scheme.UNDEFINED);
}
var scm_module_index_obarray = 0;
var scm_module_index_uses = 1;
var scm_module_index_import_obarray = 8;
function module_imported_variable(module, sym) {
// search cached imported bindings
var imports = module.fields[scm_module_index_import_obarray];
var v = imports.lookup(sym, scheme.UNDEFINED);
if (!(scheme.UNDEFINED === v)) {
return v;
}
// search use list
var uses = module.fields[scm_module_index_uses];
var found_var = scheme.FALSE;
var found_iface = scheme.FALSE;
for (; uses instanceof scheme.Pair; uses = uses.cdr) {
var iface = uses.car;
var v = scm_module_variable(iface, sym);
if (scheme.is_true(v)) {
if (scheme.is_true(found_var)) {
console.log("resolve duplicate binding");
not_implemented_yet();
} else {
found_var = v;
found_iface = iface;
}
}
}
if (scheme.is_true(found_var)) {
imports.set(sym, found_var);
return found_var;
}
return scheme.FALSE;
}
function scm_module_define(module, sym, val) {
var v = scm_module_ensure_local_variable(module, sym);
v.x = val;
return v;
}
function scm_module_lookup(module, sym) {
var v = scm_module_variable(module, sym);
if (scheme.is_true(v)) {
return v;
}
not_implemented_yet(); // FIXME: unbound
}
var module_system_is_booted = false;
var module_make_local_var_x_var = scm_module_define(scm_current_module(), new scheme.Symbol("module-make-local-var!"), scheme.UNDEFINED);
// bleh
scheme.initial_cont = function(x) {
return x;
};
scheme.primitives.return = function(x) {
return x;
};
scheme.is_true = function(obj) {
return !(obj === scheme.FALSE || obj === scheme.NIL);
};
// Builtins
var apply = function(self, k, f) {
var args = Array.prototype.slice.call(arguments, 3);
var tail = args.pop();
while (scheme.is_true(scheme.primitives["pair?"](tail))) {
args.push(tail.car);
tail = tail.cdr;
}
return f.fun.apply(f.fun, [f, k].concat(args));
};
var values = function(self, k) {
var args = Array.prototype.slice.call(arguments, 2);
return k.apply(k, args);
};
var abort_to_prompt = function(self, k, prompt) {
var args = Array.prototype.slice.call(arguments, 3);
var idx = find_prompt(prompt);
var frame = scheme.dynstack[idx];
var kont = undefined; // actual value doesn't matter
if (!scheme.is_true(frame.escape_only)) {
var f = function(self, k2) {
var args = Array.prototype.slice.call(arguments, 2);
return k.apply(k, args);
};
kont = new scheme.Closure(f, 0);
}
unwind(scheme.dynstack, idx); // FIXME:
var handler = frame.handler;
args.unshift(kont);
return handler.apply(handler, args);
};
var call_with_values = function(self, k, producer, consumer) {
var k2 = function() {
var args = Array.prototype.slice.call(arguments);
return consumer.fun.apply(consumer.fun, [consumer, k].concat(args));
};
return producer.fun(producer, k2);
};
var callcc = function(self, k, closure) {
var dynstack = scheme.dynstack.slice();
var f = function(self, k2) {
var args = Array.prototype.slice.call(arguments, 2);
var i = shared_stack_length(dynstack, scheme.dynstack);
unwind(scheme.dynstack, i);
wind(dynstack, i);
scheme.dynstack = dynstack;
return k.apply(k, args);
};
return closure.fun(closure, k, new scheme.Closure(f, 0));
};
scheme.builtins[0] = new scheme.Closure(apply, 0);
scheme.builtins[1] = new scheme.Closure(values, 0);
scheme.builtins[2] = new scheme.Closure(abort_to_prompt, 0);
scheme.builtins[3] = new scheme.Closure(call_with_values, 0);
scheme.builtins[4] = new scheme.Closure(callcc, 0);
// Structs
scheme.Struct = function(vtable, nfields) {
this.is_vtable = false;
this.vtable = vtable;
this.fields = [];
if (this.vtable && this.vtable.hasOwnProperty("children_applicable_vtables")) {
this.is_vtable = true;
this.children_applicable = true;
}
if (this.vtable && this.vtable.hasOwnProperty("children_applicable")) {
this.is_applicable = true;
this.fun = function(self, cont) {
var scm_applicable_struct_index_procedure = 0;
var clos = self.fields[scm_applicable_struct_index_procedure];
return clos.fun(clos, cont);
};
} else {
this.fun = function() {
throw "not applicable";
};
}
// FIXME: worth doing?
for (var i = 0; i < nfields; i++) {
this.fields[i] = scheme.UNDEFINED;
}
return this;
};
scheme.primitives["struct?"] = function(obj) {
return coerce_bool(obj instanceof scheme.Struct);
};
scheme.primitives["allocate-struct/immediate"] = function(vtable, nfields) {
return new scheme.Struct(vtable, nfields);
};
scheme.primitives["struct-vtable"] = function(struct) {
return struct.vtable;
};
scheme.primitives["struct-set!"] = function(struct, idx, obj) {
struct.fields[idx] = obj;
return;
};
scheme.primitives["struct-ref"] = function(struct, idx) {
return struct.fields[idx];
};
scheme.primitives["struct-set!/immediate"] = scheme.primitives["struct-set!"];
scheme.primitives["struct-ref/immediate"] = scheme.primitives["struct-ref"];
// Equality
scheme.primitives["eq?"] = function(x, y) {
return coerce_bool(x === y);
};
scheme.primitives["eqv?"] = function(x, y) {
return coerce_bool(x === y);
};
// Fluids
scheme.Fluid = function(x) {
this.value = x;
return this;
};
var the_module = new scheme.Fluid(scheme.FALSE);
scheme.primitives["pop-fluid"] = function() {
var frame = scheme.dynstack.shift();
if (frame instanceof scheme.frame.Fluid) {
frame.fluid.value = frame.old_value;
return;
} else {
throw "not a frame";
}
};
scheme.primitives["push-fluid"] = function(fluid, new_value) {
var old_value = fluid.value;
fluid.value = new_value;
var frame = new scheme.frame.Fluid(fluid, old_value);
scheme.dynstack.unshift(frame);
return;
};
scheme.primitives["fluid-ref"] = function(fluid) {
// TODO: check fluid type
return fluid.value;
};
// Variables
scheme.primitives["variable?"] = function(obj) {
// FIXME: should variables be distinct from boxes?
return coerce_bool(obj instanceof scheme.Box);
};
// Dynamic Wind
scheme.primitives["wind"] = function(enter, leave) {
var frame = new scheme.frame.DynWind(enter, leave);
scheme.dynstack.unshift(frame);
};
scheme.primitives["unwind"] = function() {
var frame = scheme.dynstack.shift();
if (!(frame instanceof scheme.frame.DynWind) && !(frame instanceof scheme.frame.Prompt)) {
throw "not a dynamic wind frame";
}
};
// Misc
scheme.primitives["prompt"] = function(escape_only, tag, handler) {
var frame = new scheme.frame.Prompt(tag, escape_only, handler);
scheme.dynstack.unshift(frame);
};
var shared_stack_length = function(dynstack1, dynstack2) {
// Assumes that if it matches at i then it matches for all x<i,
// which will be fine given that we don't reuse frames
var size1 = dynstack1.length;
var size2 = dynstack2.length;
var last = Math.min(size1, size2);
var i = last - 1;
for (; i >= 0; i--) {
if (dynstack1[i] === dynstack2[i]) {
break;
}
}
return i + 1;
};
var wind = function(dynstack, idx) {
for (var i = idx; i < dynstack.length; i++) {
var frame = dynstack[i];
if (frame instanceof scheme.frame.DynWind) {
// TODO: how to handle continuations and errors in this?
frame.wind.fun(frame.wind, scheme.initial_cont);
} else {
throw "unsupported frame type -- wind";
}
}
};
var unwind = function(dynstack, idx) {
for (var i = dynstack.length - 1; i >= idx; i--) {
var frame = dynstack[i];
if (frame instanceof scheme.frame.DynWind) {
// TODO: how to handle continuations and errors in this?
frame.unwind.fun(frame.unwind, scheme.initial_cont);
} else {
throw "unsupported frame type -- unwind";
}
}
};
var find_prompt = function(prompt) {
var eq = scheme.primitives["eq?"];
function test(x) {
return scheme.is_true(eq(x, prompt)) || scheme.is_true(eq(x, scheme.TRUE));
}
for (idx in scheme.dynstack) {
var frame = scheme.dynstack[idx];
if (frame instanceof scheme.frame.Prompt && test(frame.tag)) {
return idx;
}
}
// FIXME: should error
return undefined;
};
scheme.primitives["handle-interrupts"] = function() {
// TODO: implement
return;
};
// Dynstack frames
scheme.frame = {};
scheme.frame.Prompt = function(tag, escape_only, handler) {
this.tag = tag;
this.escape_only = escape_only;
this.handler = handler;
};
scheme.frame.Fluid = function(fluid, old_value) {
this.fluid = fluid;
this.old_value = old_value;
};
scheme.frame.DynWind = function(wind, unwind) {
this.wind = wind;
this.unwind = unwind;
};
function def_guile0(name, fn) {
var clos = new scheme.Closure(fn, 0);
def_guile_val(name, clos);
}
function def_guile_val(name, val) {
var sym = new scheme.Symbol(name); // put in obarray
var box = new scheme.Box(val);
scm_pre_modules_obarray.set(sym, box);
}
function scm_list(self, cont) {
var l = scheme.EMPTY;
for (var i = arguments.length - 1; i >= 2; i--) {
l = scheme.primitives.cons(arguments[i], l);
}
return cont(l);
}
def_guile0("list", scm_list);
def_guile0("js-eval", function(self, cont, string) {
return cont(eval(string.s));
});
def_guile0("js-ref", function(self, cont, js, attrname) {
return cont(js[attrname.s]);
});
def_guile0("js-invoke", function(self, cont, jsobj, methodname) {
var args = Array.prototype.slice.call(arguments).slice(4);
cont(jsobj[methodname.s].apply(jsobj, args));
});
def_guile0("js-call", function(self, cont, jsfunc) {
var args = Array.prototype.slice.call(arguments).slice(3);
cont(jsfunc.apply(undefined, args));
});
// Numbers
function scm_add(self, cont) {
var total = 0;
for (var i = arguments.length - 1; i >= 2; i--) {
total += arguments[i];
}
return cont(total);
}
def_guile0("+", scm_add);
function scm_mul(self, cont) {
var total = 1;
for (var i = arguments.length - 1; i >= 2; i--) {
total *= arguments[i];
}
return cont(total);
}
def_guile0("*", scm_mul);
def_guile0("integer?", function(self, cont, obj) {
// return coerce_bool(Number.isInteger(obj)); // ES6
return cont(coerce_bool(typeof obj === "number"));
});
// Lists
def_guile0("make-list", function(self, cont, n, obj) {
var list = scheme.EMPTY;
for (var i = 0; i <= n; i++) {
list = new scheme.Pair(obj, list);
}
return cont(list);
});
def_guile0("cons", function(self, cont, car, cdr) {
return cont(scheme.primitives.cons(car, cdr));
});
def_guile0("length", function(self, cont, list) {
var len = 0;
while (!scheme.is_true(scheme.primitives["null?"](list))) {
if (scheme.is_true(scheme.primitives["pair?"](list))) {
list = list.cdr;
len += 1;
} else {
console.log("length bad");
not_implemented_yet();
}
}
return cont(len);
});
def_guile0("list?", function(self, cont, list) {
while (!scheme.is_true(scheme.primitives["null?"](list))) {
if (scheme.is_true(scheme.primitives["pair?"](list))) {
list = list.cdr;
} else {
return cont(scheme.FALSE);
}
}
return cont(scheme.TRUE);
});
def_guile0("reverse", function(self, cont, lst) {
var l = scheme.EMPTY;
while (lst != scheme.EMPTY) {
l = scheme.primitives.cons(lst.car, l);
lst = lst.cdr;
}
return cont(l);
});
def_guile0("append", function(self, cont, l1, l2) {
if (arguments.length != 4) {
console.log("FIXAPPEND", arguments.length);
throw "fail";
}
if (l1 === scheme.EMPTY) {
return cont(l2);
}
var l = new scheme.Pair(l1.car, l2);
var lp = l;
while (scheme.is_true(scheme.primitives["pair?"](l1.cdr))) {
var lo = new scheme.Pair(l1.cdr.car, l2);
lp.cdr = l2;
lp = lp.cdr;
l1 = l1.cdr;
}
return cont(l);
});
function scm_equal(x, y) {
if (x instanceof scheme.Pair) {
if (y instanceof scheme.Pair) {
return scm_equal(x.car, y.car) && scm_equal(x.cdr, y.cdr);
} else {
return false;
}
} else if (y instanceof scheme.Pair) {
return false;
} else {
return x === y;
}
}
def_guile0("equal?", function(self, cont, x, y) {
return cont(coerce_bool(scm_equal(x, y)));
});
def_guile0("memq", function(self, cont, elt, list) {
// FIXME: validate list
for (; list != scheme.EMPTY && list != scheme.NIL; list = list.cdr) {
if (elt === list.car) {
// FIXME: eqv
return cont(list);
}
}
return cont(scheme.FALSE);
});
def_guile0("member", function(self, cont, elt, list) {
// FIXME: validate list
for (; list != scheme.EMPTY && list != scheme.NIL; list = list.cdr) {
if (scm_equal(elt, list.car)) {
return cont(list);
}
}
return cont(scheme.FALSE);
});
def_guile0("delete!", function(self, cont, elt, list) {
// FIXME: validate list
if (list instanceof scheme.Pair) {
// initially skip car;
for (var prev = list, walk = list.cdr; walk instanceof scheme.Pair; walk = walk.cdr) {
if (scm_equal(walk.car, elt)) {
prev.cdr = walk.cdr;
} else {
prev = prev.cdr;
}
}
// fixup car in return value, but can't delete
if (scm_equal(list.car, elt)) {
return cont(list.cdr);
}
}
return cont(list);
});
// Macros
scheme.Macro = function(name, type, binding) {
// TODO: prim field?
this.name = name;
this.type = type;
this.binding = binding;
return this;
};
def_guile0("make-syntax-transformer", function(self, cont, name, type, binding) {
return cont(new scheme.Macro(name, type, binding));
});
function scm_is_syntax(self, cont, obj) {
return cont(coerce_bool(obj instanceof scheme.Syntax));
}
def_guile0("syntax?", scm_is_syntax);
def_guile0("make-syntax", function(self, cont, expr, wrap, module) {
return cont(new scheme.Syntax(expr, wrap, module));
});
def_guile0("syntax-expression", function(self, cont, obj) {
return cont(obj.expr);
});
def_guile0("syntax-wrap", function(self, cont, obj) {
return cont(obj.wrap);
});
def_guile0("syntax-module", function(self, cont, obj) {
return cont(obj.module);
});
// Symbols
def_guile0("symbol->string", function(self, cont, sym) {
return cont(new scheme.String(sym.name));
});
var gensym_counter = 0;
function scm_gensym(self, cont, prefix) {
var name = prefix ? prefix.s : "gen ";
name += gensym_counter;
gensym_counter += 1;
return cont(new scheme.Symbol(name));
}
def_guile0("gensym", scm_gensym);
// Chars
def_guile0("char=?", function(self, cont, char1, char2) {
return cont(char1.c === char2.c);
});
// Strings
def_guile0("string=?", function(self, cont, s1, s2) {
return cont(coerce_bool(s1.s === s2.s));
});
def_guile0("string-append", function(self, cont, s1, s2) {
var s = "";
for (var i = 2; i < arguments.length; i++) {
s += arguments[i].s;
}
//console.log("sap", s1, s2, arguments.length);
return cont(new scheme.String(s));
});
def_guile0("string-join", function(self, cont, strings) {
var s = "";
while (!scheme.is_true(scheme.primitives["null?"](strings))) {
if (scheme.is_true(scheme.primitives["pair?"](strings))) {
s += strings.car.s;
strings = strings.cdr;
} else {
console.log("string-join bad");
not_implemented_yet();
}
}
return cont(new scheme.String(s));
});
// Fluids
def_guile0("make-fluid", function(self, cont, val) {
if (val === undefined) {
val = scheme.FALSE;
}
return cont(new scheme.Fluid(val));
});
// Structs
var vtable_base_layout = new scheme.String("pruhsruhpwphuhuh");
def_guile_val("standard-vtable-fields", vtable_base_layout);
var scm_vtable_index_layout = 0;
var scm_vtable_index_flags = 1;
var scm_vtable_index_self = 2;
var scm_vtable_index_instance_finalize = 3;
var scm_vtable_index_instance_printer = 4;
var scm_vtable_index_name = 5;
var scm_vtable_index_size = 6;
var scm_vtable_index_reserved_7 = 7;
var scm_vtable_offset_user = 8;
function scm_struct_init(struct, layout, args) {
// FIXME: assumes there are no tail arrays
var nfields = layout.length / 2; // assumes even
var arg = 0;
for (var i = 0; i < nfields; i++) {
if (layout[2 * i + 1] == "o" || layout[2 * i + 1] == "h") {
continue;
}
switch (layout[2 * i]) {
case "p":
struct.fields[i] = arg < args.length ? args[arg] : scheme.FALSE;
arg += 1;
break;
case "u":
struct.fields[i] = arg < args.length ? args[arg] : 0;
arg += 1;
break;
case "s":
struct.fields[i] = struct;
}
}
}
// Set up <standard-vtable>
var scm_standard_vtable = new scheme.Struct(undefined, 0);
scm_standard_vtable.vtable = scm_standard_vtable;
scm_standard_vtable.is_vtable = true; // ?
scm_struct_init(scm_standard_vtable, vtable_base_layout.s, [new scheme.Symbol(vtable_base_layout.s)]);
// scm_set_struct_vtable_name_x (scm_standard_vtable_vtable, name);
def_guile_val("<standard-vtable>", scm_standard_vtable);
def_guile_val("vtable-index-layout", scm_vtable_index_layout);
def_guile_val("vtable-index-printer", scm_vtable_index_instance_printer);
def_guile_val("vtable-offset-user", scm_vtable_offset_user);
function scm_make_struct(vtable, args) {
var layout = vtable.fields[scm_vtable_index_layout].name;
var s = new scheme.Struct(vtable, layout.length / 2);
scm_struct_init(s, layout, args);
return s;
}
def_guile0("make-struct/no-tail", function(self, cont, vtable) {
var args = Array.prototype.slice.call(arguments, 3);
return cont(scm_make_struct(vtable, args));
});
def_guile0("make-vtable", function(self, cont, fields, printer) {
var layout = new scheme.Symbol(fields.s); // make-struct-layout
var str = scm_make_struct(scm_standard_vtable, [layout, printer]);
str.is_vtable = true;
return cont(str);
});
def_guile0("make-struct-layout", function(self, cont, str) {
var layout = new scheme.Symbol(str.s);
return cont(layout);
});
def_guile0("struct-vtable?", function(self, cont, obj) {
// We don't inherit flags, so =struct-vtable?= may give the wrong
// answer where SCM_VTABLE_FLAG_VTABLE would have been set
var bool = coerce_bool(obj instanceof scheme.Struct && obj.is_vtable);
return cont(bool);
});
var applicable_vtable = scm_make_struct(scm_standard_vtable, [new scheme.Symbol(vtable_base_layout.s)]);
applicable_vtable.children_applicable_vtables = true;
def_guile_val("<applicable-struct-vtable>", applicable_vtable);
def_guile_val("record-type-vtable", scm_standard_vtable); // FIXME:
def_guile0("set-struct-vtable-name!", function(self, cont, val, args) {
// FIXME:
return cont(scheme.FALSE);
});
def_guile0("make-struct", function(self, cont, vtable, tailsize) {
if (tailsize === 0) {
// make-struct/no-tail
var args = Array.prototype.slice.call(arguments, 4);
return cont(scm_make_struct(vtable, args));
} else {
console.log("make-struct with tail", arguments);
not_implemented_yet();
}
});
// Procedures
def_guile0("procedure?", function(self, cont, obj) {
return cont(coerce_bool(obj instanceof scheme.Closure));
});
def_guile0("set-procedure-property!", function(self, cont, procedure, property, obj) {
return cont(scheme.FALSE);
});
def_guile0("make-procedure-with-setter", function(self, cont, procedure, setter) {
return cont(scheme.FALSE);
});
// Hashtables
def_guile0("make-hash-table", function(self, cont, size) {
return cont(new scheme.HashTable());
});
def_guile0("make-weak-key-hash-table", function(self, cont, size) {
return cont(new scheme.HashTable(true));
});
def_guile0("make-weak-value-hash-table", function(self, cont, size) {
// FIXME:
return cont(new scheme.HashTable(true));
});
def_guile0("hash-clear!", function(self, cont, hashtable) {
return cont(hashtable.clear());
});
def_guile0("hashq-remove!", function(self, cont, htable, key) {
return cont(htable.delete(key));
});
def_guile0("hashq-ref", function(self, cont, obarray, sym, dflt) {
return cont(obarray.lookup(sym, dflt ? dflt : scheme.FALSE));
});
def_guile0("hashq-set!", function(self, cont, hashtable, key, obj) {
return cont(hashtable.set(key, obj));
});
def_guile0("hash-for-each", function(self, cont, proc, htable) {
var keys = htable.keys(); // don't know if I can use js iterators
var loop = function(i) {
if (i === keys.length) {
return cont(scheme.UNSPECIFIED);
} else {
var newk = function() {
return loop(i + 1);
};
return proc.fun(proc, newk, keys[i], htable.get(keys[i]));
}
};
return loop(0);
});
def_guile0("hash-map->list", function(self, cont, proc, htable) {
var keys = htable.keys(); // don't know if I can use js iterators
var loop = function(i, retval, k) {
if (i === keys.length) {
return k(retval);
} else {
var newk = function(result) {
return loop(i + 1, scheme.primitives.cons(result, retval), k);
};
return proc.fun(proc, newk, keys[i], htable.get(keys[i]));
}
};
return loop(0, scheme.EMPTY, cont);
});
// Modules
def_guile0("make-variable", function(self, cont, val) {
return cont(new scheme.Box(val));
});
def_guile0("make-undefined-variable", function(self, cont, val) {
return cont(new scheme.Box(scheme.UNDEFINED));
});
def_guile0("variable-bound?", function(self, cont, box) {
return cont(coerce_bool(!(box.x === scheme.UNDEFINED)));
});
def_guile0("define!", function(self, cont, symbol, value) {
// FIXME: validate symbol
return cont(scm_module_define(scm_current_module(), symbol, value));
});
var boot_modules = {};
function scm_primitive_load_path(self, cont, path) {
if (path.s in boot_modules) {
return boot_modules[path.s](cont);
} else {
console.log("primitive load path", arguments);
not_implemented_yet();
}
}
def_guile0("primitive-load-path", scm_primitive_load_path);
boot_modules["ice-9/deprecated"] = function() {};
boot_modules["ice-9/ports"] = function() {};
boot_modules["ice-9/posix"] = function() {};
boot_modules["ice-9/threads"] = function() {};
boot_modules["srfi/srfi-4"] = function() {};
def_guile0("module-local-variable", function(self, cont, module, symbol) {
// module system is booted, then validate module
// validate symbol
if (!scheme.is_true(module)) {
// hashq ref
return cont(scm_pre_modules_obarray.lookup(symbol, scheme.UNDEFINED));
}
// 1. check module_obarray
var obarray = module.fields[0]; // SCM_MODULE_OBARRAY
var b = obarray.lookup(symbol, scheme.UNDEFINED);
if (b != scheme.UNDEFINED) {
// is_true
return cont(b);
}
// FIXME: check binders
return cont(scheme.FALSE);
});
def_guile0("module-variable", function(self, cont, module, symbol) {
return cont(scm_module_variable(module, symbol));
});
def_guile0("%get-pre-modules-obarray", function(self, cont) {
return cont(scm_pre_modules_obarray);
});
def_guile0("set-current-module", function(self, cont, module) {
if (!module_system_is_booted) {
scm_post_boot_init_modules();
}
// SCM_VALIDATE_MODULE (SCM_ARG1, module);
var old = scm_current_module();
the_module.value = module;
return cont(old);
});
var k_ensure;
var resolve_module_var;
function scm_post_boot_init_modules() {
module_system_is_booted = true;
the_root_module = scm_lookup(new scheme.Symbol("the-root-module"));
k_ensure = new scheme.Keyword("ensure");
resolve_module_var = scm_lookup(new scheme.Symbol("resolve-module"));
module_public_interface_var = scm_lookup(new scheme.Symbol("module-public-interface"));
}
// Stubs
function stub(name) {
function scm_fn(self, cont) {
console.log(name, arguments);
not_implemented_yet();
}
def_guile0(name, scm_fn);
}
stub("syntax-session-id");
stub("macroexpand");
stub("%exception-handler");
stub("print-exception");
def_guile_val("*features*", scheme.EMPTY);
stub("%load-hook");
stub("current-reader");
def_guile0("read-hash-extend", function(self, cont, char, fun) {
return cont(scheme.FALSE);
});
scheme.Hook = function(arity) {
this.arity = arity;
this.procs = [];
};
def_guile0("make-hook", function(self, cont, nargs) {
var arity = nargs === undefined ? 0 : nargs;
return cont(new scheme.Hook(arity));
});
def_guile0("run-hook", function(self, cont, hook) {
var procs = hook.procs;
var args = Array.prototype.slice.call(arguments, 3);
// FIXME: validate hook
// FIXME: check num args = arity or error
var loop = function(i) {
if (i === procs.length) {
return cont(scheme.UNSPECIFIED);
} else {
var newk = function() {
return loop(i + 1);
};
var proc = procs[i];
return proc.fun.apply(proc.fun, [proc, newk].concat(args));
}
};
return loop(0);
});
function scm_simple_format(self, cont) {
not_implemented_yet();
}
def_guile0("simple-format", scm_simple_format);
def_guile0("scm-error", function(self, cont, key, subr, message, args, data) {
not_implemented_yet();
});
/* ---------- end of runtime ---------- */
boot_modules["ice-9/posix"] = function(cont) {
return cont(scheme.UNDEFINED);
};
/* ---------- */
boot_modules["ice-9/ports"] = function(unit_cont) {
var k_0 = function(v_0, k_21) {
var k_1 = function(v_0) {
var v_1 = scheme["list"](new scheme["Symbol"]("guile"));
var v_2 = new scheme["Symbol"]("define-module*");
var v_3 = scheme["FALSE"];
var v_4 = scheme["TRUE"];
var v_5 = scheme["primitives"]["cached-module-box"](v_1, v_2, v_3, v_4);
var v_6 = scheme["primitives"]["box-ref"](v_5);
var v_7 = scheme["list"](new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("ports"));
var v_8 = new scheme["Keyword"]("filename");
scheme["primitives"]["handle-interrupts"]();
var k_12 = function(v_m, v_rest) {
var v_9 = v_m;
var v_10 = v_rest;
var v_11 = new scheme["Symbol"]("set-current-module");
var v_12 = scheme["primitives"]["cached-module-box"](v_1, v_11, v_3, v_4);
var v_13 = scheme["primitives"]["box-ref"](v_12);
scheme["primitives"]["handle-interrupts"]();
var k_18 = function(v_vals) {
var v_14 = v_vals;
scheme["primitives"]["handle-interrupts"]();
return k_21(v_9);
};
return v_13["fun"](v_13, k_18, v_9);
};
return v_6["fun"](v_6, k_12, v_7, v_8, v_3);
};
if (arguments["length"] == 2) {
{
return k_1(v_0);
}
} else {
{
return undefined;
}
}
};
return k_0(undefined, unit_cont);
};
/* ---------- */
boot_modules["ice-9/threads"] = function(unit_cont) {
var k_0 = function(v_0, k_21) {
var k_1 = function(v_0) {
var v_1 = scheme["list"](new scheme["Symbol"]("guile"));
var v_2 = new scheme["Symbol"]("define-module*");
var v_3 = scheme["FALSE"];
var v_4 = scheme["TRUE"];
var v_5 = scheme["primitives"]["cached-module-box"](v_1, v_2, v_3, v_4);
var v_6 = scheme["primitives"]["box-ref"](v_5);
var v_7 = scheme["list"](new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("threads"));
var v_8 = new scheme["Keyword"]("filename");
scheme["primitives"]["handle-interrupts"]();
var k_12 = function(v_m, v_rest) {
var v_9 = v_m;
var v_10 = v_rest;
var v_11 = new scheme["Symbol"]("set-current-module");
var v_12 = scheme["primitives"]["cached-module-box"](v_1, v_11, v_3, v_4);
var v_13 = scheme["primitives"]["box-ref"](v_12);
scheme["primitives"]["handle-interrupts"]();
var k_18 = function(v_vals) {
var v_14 = v_vals;
scheme["primitives"]["handle-interrupts"]();
return k_21(v_9);
};
return v_13["fun"](v_13, k_18, v_9);
};
return v_6["fun"](v_6, k_12, v_7, v_8, v_3);
};
if (arguments["length"] == 2) {
{
return k_1(v_0);
}
} else {
{
return undefined;
}
}
};
return k_0(undefined, unit_cont);
};
/* ---------- */
boot_modules["srfi/srfi-4"] = function(unit_cont) {
var k_0 = function(v_0, k_21) {
var k_1 = function(v_0) {
var v_1 = scheme["list"](new scheme["Symbol"]("guile"));
var v_2 = new scheme["Symbol"]("define-module*");
var v_3 = scheme["FALSE"];
var v_4 = scheme["TRUE"];
var v_5 = scheme["primitives"]["cached-module-box"](v_1, v_2, v_3, v_4);
var v_6 = scheme["primitives"]["box-ref"](v_5);
var v_7 = scheme["list"](new scheme["Symbol"]("srfi"), new scheme["Symbol"]("srfi-4"));
var v_8 = new scheme["Keyword"]("filename");
scheme["primitives"]["handle-interrupts"]();
var k_12 = function(v_m, v_rest) {
var v_9 = v_m;
var v_10 = v_rest;
var v_11 = new scheme["Symbol"]("set-current-module");
var v_12 = scheme["primitives"]["cached-module-box"](v_1, v_11, v_3, v_4);
var v_13 = scheme["primitives"]["box-ref"](v_12);
scheme["primitives"]["handle-interrupts"]();
var k_18 = function(v_vals) {
var v_14 = v_vals;
scheme["primitives"]["handle-interrupts"]();
return k_21(v_9);
};
return v_13["fun"](v_13, k_18, v_9);
};
return v_6["fun"](v_6, k_12, v_7, v_8, v_3);
};
if (arguments["length"] == 2) {
{
return k_1(v_0);
}
} else {
{
return undefined;
}
}
};
return k_0(undefined, unit_cont);
};
/* ---------- */
boot_modules["ice-9/deprecated"] = function(unit_cont) {
var k_0 = function(v_0, k_645) {
var k_1 = function(v_0) {
var v_1 = scheme["list"](new scheme["Symbol"]("guile"));
var v_2 = new scheme["Symbol"]("define-module*");
var v_3 = scheme["FALSE"];
var v_4 = scheme["TRUE"];
var v_5 = scheme["primitives"]["cached-module-box"](v_1, v_2, v_3, v_4);
var v_6 = scheme["primitives"]["box-ref"](v_5);
var v_7 = scheme["list"](new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"));
var v_8 = new scheme["Keyword"]("filename");
var v_9 = new scheme["String"]("/home/amirouche/src/guile/guile/module/ice-9/deprecated.scm");
var v_10 = new scheme["Keyword"]("imports");
var v_11 = scheme["list"](scheme["list"](scheme["list"](new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("threads")), new scheme["Keyword"]("prefix"), new scheme["Symbol"]("threads:")));
scheme["primitives"]["handle-interrupts"]();
var k_15 = function(v_m, v_rest) {
var v_12 = v_m;
var v_13 = v_rest;
var v_14 = new scheme["Symbol"]("set-current-module");
var v_15 = scheme["primitives"]["cached-module-box"](v_1, v_14, v_3, v_4);
var v_16 = scheme["primitives"]["box-ref"](v_15);
scheme["primitives"]["handle-interrupts"]();
var k_21 = function(v_vals) {
var v_17 = v_vals;
var v_18 = new scheme["Symbol"]("define-deprecated");
var v_19 = new scheme["Symbol"]("macro");
var v_20 = new scheme["Closure"](k_646, 0);
var v_21 = scheme["list"](new scheme["Symbol"]("guile"));
var v_22 = new scheme["Symbol"]("make-syntax-transformer");
var v_23 = scheme["FALSE"];
var v_24 = scheme["TRUE"];
var v_25 = scheme["primitives"]["cached-module-box"](v_21, v_22, v_23, v_24);
var v_26 = scheme["primitives"]["box-ref"](v_25);
scheme["primitives"]["handle-interrupts"]();
var k_33 = function(v_arg, v_rest) {
var v_27 = v_arg;
var v_28 = v_rest;
var v_29 = scheme["primitives"]["define!"](v_18);
scheme["primitives"]["box-set!"](v_29, v_27);
var v_30 = new scheme["Symbol"]("_IONBF");
var v_31 = scheme["primitives"]["current-module"]();
var v_32 = 57;
scheme["primitives"]["cache-current-module!"](v_31, v_32);
var v_33 = new scheme["Closure"](k_717, 0);
var v_34 = scheme["list"](new scheme["Symbol"]("guile"));
var v_35 = new scheme["Symbol"]("make-syntax-transformer");
var v_36 = scheme["FALSE"];
var v_37 = scheme["TRUE"];
var v_38 = scheme["primitives"]["cached-module-box"](v_34, v_35, v_36, v_37);
var v_39 = scheme["primitives"]["box-ref"](v_38);
scheme["primitives"]["handle-interrupts"]();
var k_49 = function(v_arg, v_rest) {
var v_40 = v_arg;
var v_41 = v_rest;
var v_42 = scheme["primitives"]["define!"](v_30);
scheme["primitives"]["box-set!"](v_42, v_40);
var v_43 = new scheme["Symbol"]("call-with-deferred-observers");
var v_44 = scheme["primitives"]["cached-module-box"](v_1, v_43, v_3, v_4);
var v_45 = scheme["primitives"]["box-ref"](v_44);
var v_46 = new scheme["Closure"](k_800, 0);
scheme["primitives"]["handle-interrupts"]();
var k_58 = function(v_vals) {
var v_47 = v_vals;
var v_48 = new scheme["Symbol"]("_IOLBF");
var v_49 = scheme["primitives"]["current-module"]();
var v_50 = 55;
scheme["primitives"]["cache-current-module!"](v_49, v_50);
var v_51 = new scheme["Closure"](k_813, 0);
var v_52 = scheme["list"](new scheme["Symbol"]("guile"));
var v_53 = new scheme["Symbol"]("make-syntax-transformer");
var v_54 = scheme["FALSE"];
var v_55 = scheme["TRUE"];
var v_56 = scheme["primitives"]["cached-module-box"](v_52, v_53, v_54, v_55);
var v_57 = scheme["primitives"]["box-ref"](v_56);
scheme["primitives"]["handle-interrupts"]();
var k_72 = function(v_arg, v_rest) {
var v_58 = v_arg;
var v_59 = v_rest;
var v_60 = scheme["primitives"]["define!"](v_48);
scheme["primitives"]["box-set!"](v_60, v_58);
var v_61 = scheme["primitives"]["box-ref"](v_44);
var v_62 = new scheme["Closure"](k_896, 0);
scheme["primitives"]["handle-interrupts"]();
var k_79 = function(v_vals) {
var v_63 = v_vals;
var v_64 = new scheme["Symbol"]("_IOFBF");
var v_65 = scheme["primitives"]["current-module"]();
var v_66 = 53;
scheme["primitives"]["cache-current-module!"](v_65, v_66);
var v_67 = new scheme["Closure"](k_909, 0);
var v_68 = scheme["list"](new scheme["Symbol"]("guile"));
var v_69 = new scheme["Symbol"]("make-syntax-transformer");
var v_70 = scheme["FALSE"];
var v_71 = scheme["TRUE"];
var v_72 = scheme["primitives"]["cached-module-box"](v_68, v_69, v_70, v_71);
var v_73 = scheme["primitives"]["box-ref"](v_72);
scheme["primitives"]["handle-interrupts"]();
var k_93 = function(v_arg, v_rest) {
var v_74 = v_arg;
var v_75 = v_rest;
var v_76 = scheme["primitives"]["define!"](v_64);
scheme["primitives"]["box-set!"](v_76, v_74);
var v_77 = scheme["primitives"]["box-ref"](v_44);
var v_78 = new scheme["Closure"](k_992, 0);
scheme["primitives"]["handle-interrupts"]();
var k_100 = function(v_vals) {
var v_79 = v_vals;
var v_80 = new scheme["Symbol"]("define-deprecated/threads");
var v_81 = scheme["primitives"]["current-module"]();
var v_82 = 51;
scheme["primitives"]["cache-current-module!"](v_81, v_82);
var v_83 = new scheme["Closure"](k_1005, 0);
var v_84 = scheme["list"](new scheme["Symbol"]("guile"));
var v_85 = new scheme["Symbol"]("make-syntax-transformer");
var v_86 = scheme["FALSE"];
var v_87 = scheme["TRUE"];
var v_88 = scheme["primitives"]["cached-module-box"](v_84, v_85, v_86, v_87);
var v_89 = scheme["primitives"]["box-ref"](v_88);
scheme["primitives"]["handle-interrupts"]();
var k_114 = function(v_arg, v_rest) {
var v_90 = v_arg;
var v_91 = v_rest;
var v_92 = scheme["primitives"]["define!"](v_80);
scheme["primitives"]["box-set!"](v_92, v_90);
var v_93 = new scheme["Symbol"]("define-deprecated/threads*");
var v_94 = new scheme["Closure"](k_1120, 0);
var v_95 = scheme["list"](new scheme["Symbol"]("guile"));
var v_96 = new scheme["Symbol"]("make-syntax-transformer");
var v_97 = scheme["FALSE"];
var v_98 = scheme["TRUE"];
var v_99 = scheme["primitives"]["cached-module-box"](v_95, v_96, v_97, v_98);
var v_100 = scheme["primitives"]["box-ref"](v_99);
scheme["primitives"]["handle-interrupts"]();
var k_127 = function(v_arg, v_rest) {
var v_101 = v_arg;
var v_102 = v_rest;
var v_103 = scheme["primitives"]["define!"](v_93);
scheme["primitives"]["box-set!"](v_103, v_101);
var v_104 = new scheme["Symbol"]("call-with-new-thread");
var v_105 = scheme["primitives"]["current-module"]();
var v_106 = 49;
scheme["primitives"]["cache-current-module!"](v_105, v_106);
var v_107 = new scheme["Closure"](k_1175, 0);
var v_108 = scheme["list"](new scheme["Symbol"]("guile"));
var v_109 = new scheme["Symbol"]("make-syntax-transformer");
var v_110 = scheme["FALSE"];
var v_111 = scheme["TRUE"];
var v_112 = scheme["primitives"]["cached-module-box"](v_108, v_109, v_110, v_111);
var v_113 = scheme["primitives"]["box-ref"](v_112);
scheme["primitives"]["handle-interrupts"]();
var k_143 = function(v_arg, v_rest) {
var v_114 = v_arg;
var v_115 = v_rest;
var v_116 = scheme["primitives"]["define!"](v_104);
scheme["primitives"]["box-set!"](v_116, v_114);
var v_117 = scheme["primitives"]["box-ref"](v_44);
var v_118 = new scheme["Closure"](k_1258, 0);
scheme["primitives"]["handle-interrupts"]();
var k_150 = function(v_vals) {
var v_119 = v_vals;
var v_120 = new scheme["Symbol"]("yield");
var v_121 = scheme["primitives"]["current-module"]();
var v_122 = 47;
scheme["primitives"]["cache-current-module!"](v_121, v_122);
var v_123 = new scheme["Closure"](k_1271, 0);
var v_124 = scheme["list"](new scheme["Symbol"]("guile"));
var v_125 = new scheme["Symbol"]("make-syntax-transformer");
var v_126 = scheme["FALSE"];
var v_127 = scheme["TRUE"];
var v_128 = scheme["primitives"]["cached-module-box"](v_124, v_125, v_126, v_127);
var v_129 = scheme["primitives"]["box-ref"](v_128);
scheme["primitives"]["handle-interrupts"]();
var k_164 = function(v_arg, v_rest) {
var v_130 = v_arg;
var v_131 = v_rest;
var v_132 = scheme["primitives"]["define!"](v_120);
scheme["primitives"]["box-set!"](v_132, v_130);
var v_133 = scheme["primitives"]["box-ref"](v_44);
var v_134 = new scheme["Closure"](k_1354, 0);
scheme["primitives"]["handle-interrupts"]();
var k_171 = function(v_vals) {
var v_135 = v_vals;
var v_136 = new scheme["Symbol"]("cancel-thread");
var v_137 = scheme["primitives"]["current-module"]();
var v_138 = 45;
scheme["primitives"]["cache-current-module!"](v_137, v_138);
var v_139 = new scheme["Closure"](k_1367, 0);
var v_140 = scheme["list"](new scheme["Symbol"]("guile"));
var v_141 = new scheme["Symbol"]("make-syntax-transformer");
var v_142 = scheme["FALSE"];
var v_143 = scheme["TRUE"];
var v_144 = scheme["primitives"]["cached-module-box"](v_140, v_141, v_142, v_143);
var v_145 = scheme["primitives"]["box-ref"](v_144);
scheme["primitives"]["handle-interrupts"]();
var k_185 = function(v_arg, v_rest) {
var v_146 = v_arg;
var v_147 = v_rest;
var v_148 = scheme["primitives"]["define!"](v_136);
scheme["primitives"]["box-set!"](v_148, v_146);
var v_149 = scheme["primitives"]["box-ref"](v_44);
var v_150 = new scheme["Closure"](k_1450, 0);
scheme["primitives"]["handle-interrupts"]();
var k_192 = function(v_vals) {
var v_151 = v_vals;
var v_152 = new scheme["Symbol"]("join-thread");
var v_153 = scheme["primitives"]["current-module"]();
var v_154 = 43;
scheme["primitives"]["cache-current-module!"](v_153, v_154);
var v_155 = new scheme["Closure"](k_1463, 0);
var v_156 = scheme["list"](new scheme["Symbol"]("guile"));
var v_157 = new scheme["Symbol"]("make-syntax-transformer");
var v_158 = scheme["FALSE"];
var v_159 = scheme["TRUE"];
var v_160 = scheme["primitives"]["cached-module-box"](v_156, v_157, v_158, v_159);
var v_161 = scheme["primitives"]["box-ref"](v_160);
scheme["primitives"]["handle-interrupts"]();
var k_206 = function(v_arg, v_rest) {
var v_162 = v_arg;
var v_163 = v_rest;
var v_164 = scheme["primitives"]["define!"](v_152);
scheme["primitives"]["box-set!"](v_164, v_162);
var v_165 = scheme["primitives"]["box-ref"](v_44);
var v_166 = new scheme["Closure"](k_1546, 0);
scheme["primitives"]["handle-interrupts"]();
var k_213 = function(v_vals) {
var v_167 = v_vals;
var v_168 = new scheme["Symbol"]("thread?");
var v_169 = scheme["primitives"]["current-module"]();
var v_170 = 41;
scheme["primitives"]["cache-current-module!"](v_169, v_170);
var v_171 = new scheme["Closure"](k_1559, 0);
var v_172 = scheme["list"](new scheme["Symbol"]("guile"));
var v_173 = new scheme["Symbol"]("make-syntax-transformer");
var v_174 = scheme["FALSE"];
var v_175 = scheme["TRUE"];
var v_176 = scheme["primitives"]["cached-module-box"](v_172, v_173, v_174, v_175);
var v_177 = scheme["primitives"]["box-ref"](v_176);
scheme["primitives"]["handle-interrupts"]();
var k_227 = function(v_arg, v_rest) {
var v_178 = v_arg;
var v_179 = v_rest;
var v_180 = scheme["primitives"]["define!"](v_168);
scheme["primitives"]["box-set!"](v_180, v_178);
var v_181 = scheme["primitives"]["box-ref"](v_44);
var v_182 = new scheme["Closure"](k_1642, 0);
scheme["primitives"]["handle-interrupts"]();
var k_234 = function(v_vals) {
var v_183 = v_vals;
var v_184 = new scheme["Symbol"]("make-mutex");
var v_185 = scheme["primitives"]["current-module"]();
var v_186 = 39;
scheme["primitives"]["cache-current-module!"](v_185, v_186);
var v_187 = new scheme["Closure"](k_1655, 0);
var v_188 = scheme["list"](new scheme["Symbol"]("guile"));
var v_189 = new scheme["Symbol"]("make-syntax-transformer");
var v_190 = scheme["FALSE"];
var v_191 = scheme["TRUE"];
var v_192 = scheme["primitives"]["cached-module-box"](v_188, v_189, v_190, v_191);
var v_193 = scheme["primitives"]["box-ref"](v_192);
scheme["primitives"]["handle-interrupts"]();
var k_248 = function(v_arg, v_rest) {
var v_194 = v_arg;
var v_195 = v_rest;
var v_196 = scheme["primitives"]["define!"](v_184);
scheme["primitives"]["box-set!"](v_196, v_194);
var v_197 = scheme["primitives"]["box-ref"](v_44);
var v_198 = new scheme["Closure"](k_1738, 0);
scheme["primitives"]["handle-interrupts"]();
var k_255 = function(v_vals) {
var v_199 = v_vals;
var v_200 = new scheme["Symbol"]("make-recursive-mutex");
var v_201 = scheme["primitives"]["current-module"]();
var v_202 = 37;
scheme["primitives"]["cache-current-module!"](v_201, v_202);
var v_203 = new scheme["Closure"](k_1751, 0);
var v_204 = scheme["list"](new scheme["Symbol"]("guile"));
var v_205 = new scheme["Symbol"]("make-syntax-transformer");
var v_206 = scheme["FALSE"];
var v_207 = scheme["TRUE"];
var v_208 = scheme["primitives"]["cached-module-box"](v_204, v_205, v_206, v_207);
var v_209 = scheme["primitives"]["box-ref"](v_208);
scheme["primitives"]["handle-interrupts"]();
var k_269 = function(v_arg, v_rest) {
var v_210 = v_arg;
var v_211 = v_rest;
var v_212 = scheme["primitives"]["define!"](v_200);
scheme["primitives"]["box-set!"](v_212, v_210);
var v_213 = scheme["primitives"]["box-ref"](v_44);
var v_214 = new scheme["Closure"](k_1834, 0);
scheme["primitives"]["handle-interrupts"]();
var k_276 = function(v_vals) {
var v_215 = v_vals;
var v_216 = new scheme["Symbol"]("lock-mutex");
var v_217 = scheme["primitives"]["current-module"]();
var v_218 = 35;
scheme["primitives"]["cache-current-module!"](v_217, v_218);
var v_219 = new scheme["Closure"](k_1847, 0);
var v_220 = scheme["list"](new scheme["Symbol"]("guile"));
var v_221 = new scheme["Symbol"]("make-syntax-transformer");
var v_222 = scheme["FALSE"];
var v_223 = scheme["TRUE"];
var v_224 = scheme["primitives"]["cached-module-box"](v_220, v_221, v_222, v_223);
var v_225 = scheme["primitives"]["box-ref"](v_224);
scheme["primitives"]["handle-interrupts"]();
var k_290 = function(v_arg, v_rest) {
var v_226 = v_arg;
var v_227 = v_rest;
var v_228 = scheme["primitives"]["define!"](v_216);
scheme["primitives"]["box-set!"](v_228, v_226);
var v_229 = scheme["primitives"]["box-ref"](v_44);
var v_230 = new scheme["Closure"](k_1930, 0);
scheme["primitives"]["handle-interrupts"]();
var k_297 = function(v_vals) {
var v_231 = v_vals;
var v_232 = new scheme["Symbol"]("try-mutex");
var v_233 = scheme["primitives"]["current-module"]();
var v_234 = 33;
scheme["primitives"]["cache-current-module!"](v_233, v_234);
var v_235 = new scheme["Closure"](k_1943, 0);
var v_236 = scheme["list"](new scheme["Symbol"]("guile"));
var v_237 = new scheme["Symbol"]("make-syntax-transformer");
var v_238 = scheme["FALSE"];
var v_239 = scheme["TRUE"];
var v_240 = scheme["primitives"]["cached-module-box"](v_236, v_237, v_238, v_239);
var v_241 = scheme["primitives"]["box-ref"](v_240);
scheme["primitives"]["handle-interrupts"]();
var k_311 = function(v_arg, v_rest) {
var v_242 = v_arg;
var v_243 = v_rest;
var v_244 = scheme["primitives"]["define!"](v_232);
scheme["primitives"]["box-set!"](v_244, v_242);
var v_245 = scheme["primitives"]["box-ref"](v_44);
var v_246 = new scheme["Closure"](k_2026, 0);
scheme["primitives"]["handle-interrupts"]();
var k_318 = function(v_vals) {
var v_247 = v_vals;
var v_248 = new scheme["Symbol"]("unlock-mutex");
var v_249 = scheme["primitives"]["current-module"]();
var v_250 = 31;
scheme["primitives"]["cache-current-module!"](v_249, v_250);
var v_251 = new scheme["Closure"](k_2039, 0);
var v_252 = scheme["list"](new scheme["Symbol"]("guile"));
var v_253 = new scheme["Symbol"]("make-syntax-transformer");
var v_254 = scheme["FALSE"];
var v_255 = scheme["TRUE"];
var v_256 = scheme["primitives"]["cached-module-box"](v_252, v_253, v_254, v_255);
var v_257 = scheme["primitives"]["box-ref"](v_256);
scheme["primitives"]["handle-interrupts"]();
var k_332 = function(v_arg, v_rest) {
var v_258 = v_arg;
var v_259 = v_rest;
var v_260 = scheme["primitives"]["define!"](v_248);
scheme["primitives"]["box-set!"](v_260, v_258);
var v_261 = scheme["primitives"]["box-ref"](v_44);
var v_262 = new scheme["Closure"](k_2122, 0);
scheme["primitives"]["handle-interrupts"]();
var k_339 = function(v_vals) {
var v_263 = v_vals;
var v_264 = new scheme["Symbol"]("mutex?");
var v_265 = scheme["primitives"]["current-module"]();
var v_266 = 29;
scheme["primitives"]["cache-current-module!"](v_265, v_266);
var v_267 = new scheme["Closure"](k_2135, 0);
var v_268 = scheme["list"](new scheme["Symbol"]("guile"));
var v_269 = new scheme["Symbol"]("make-syntax-transformer");
var v_270 = scheme["FALSE"];
var v_271 = scheme["TRUE"];
var v_272 = scheme["primitives"]["cached-module-box"](v_268, v_269, v_270, v_271);
var v_273 = scheme["primitives"]["box-ref"](v_272);
scheme["primitives"]["handle-interrupts"]();
var k_353 = function(v_arg, v_rest) {
var v_274 = v_arg;
var v_275 = v_rest;
var v_276 = scheme["primitives"]["define!"](v_264);
scheme["primitives"]["box-set!"](v_276, v_274);
var v_277 = scheme["primitives"]["box-ref"](v_44);
var v_278 = new scheme["Closure"](k_2218, 0);
scheme["primitives"]["handle-interrupts"]();
var k_360 = function(v_vals) {
var v_279 = v_vals;
var v_280 = new scheme["Symbol"]("mutex-owner");
var v_281 = scheme["primitives"]["current-module"]();
var v_282 = 27;
scheme["primitives"]["cache-current-module!"](v_281, v_282);
var v_283 = new scheme["Closure"](k_2231, 0);
var v_284 = scheme["list"](new scheme["Symbol"]("guile"));
var v_285 = new scheme["Symbol"]("make-syntax-transformer");
var v_286 = scheme["FALSE"];
var v_287 = scheme["TRUE"];
var v_288 = scheme["primitives"]["cached-module-box"](v_284, v_285, v_286, v_287);
var v_289 = scheme["primitives"]["box-ref"](v_288);
scheme["primitives"]["handle-interrupts"]();
var k_374 = function(v_arg, v_rest) {
var v_290 = v_arg;
var v_291 = v_rest;
var v_292 = scheme["primitives"]["define!"](v_280);
scheme["primitives"]["box-set!"](v_292, v_290);
var v_293 = scheme["primitives"]["box-ref"](v_44);
var v_294 = new scheme["Closure"](k_2314, 0);
scheme["primitives"]["handle-interrupts"]();
var k_381 = function(v_vals) {
var v_295 = v_vals;
var v_296 = new scheme["Symbol"]("mutex-level");
var v_297 = scheme["primitives"]["current-module"]();
var v_298 = 25;
scheme["primitives"]["cache-current-module!"](v_297, v_298);
var v_299 = new scheme["Closure"](k_2327, 0);
var v_300 = scheme["list"](new scheme["Symbol"]("guile"));
var v_301 = new scheme["Symbol"]("make-syntax-transformer");
var v_302 = scheme["FALSE"];
var v_303 = scheme["TRUE"];
var v_304 = scheme["primitives"]["cached-module-box"](v_300, v_301, v_302, v_303);
var v_305 = scheme["primitives"]["box-ref"](v_304);
scheme["primitives"]["handle-interrupts"]();
var k_395 = function(v_arg, v_rest) {
var v_306 = v_arg;
var v_307 = v_rest;
var v_308 = scheme["primitives"]["define!"](v_296);
scheme["primitives"]["box-set!"](v_308, v_306);
var v_309 = scheme["primitives"]["box-ref"](v_44);
var v_310 = new scheme["Closure"](k_2410, 0);
scheme["primitives"]["handle-interrupts"]();
var k_402 = function(v_vals) {
var v_311 = v_vals;
var v_312 = new scheme["Symbol"]("mutex-locked?");
var v_313 = scheme["primitives"]["current-module"]();
var v_314 = 23;
scheme["primitives"]["cache-current-module!"](v_313, v_314);
var v_315 = new scheme["Closure"](k_2423, 0);
var v_316 = scheme["list"](new scheme["Symbol"]("guile"));
var v_317 = new scheme["Symbol"]("make-syntax-transformer");
var v_318 = scheme["FALSE"];
var v_319 = scheme["TRUE"];
var v_320 = scheme["primitives"]["cached-module-box"](v_316, v_317, v_318, v_319);
var v_321 = scheme["primitives"]["box-ref"](v_320);
scheme["primitives"]["handle-interrupts"]();
var k_416 = function(v_arg, v_rest) {
var v_322 = v_arg;
var v_323 = v_rest;
var v_324 = scheme["primitives"]["define!"](v_312);
scheme["primitives"]["box-set!"](v_324, v_322);
var v_325 = scheme["primitives"]["box-ref"](v_44);
var v_326 = new scheme["Closure"](k_2506, 0);
scheme["primitives"]["handle-interrupts"]();
var k_423 = function(v_vals) {
var v_327 = v_vals;
var v_328 = new scheme["Symbol"]("make-condition-variable");
var v_329 = scheme["primitives"]["current-module"]();
var v_330 = 21;
scheme["primitives"]["cache-current-module!"](v_329, v_330);
var v_331 = new scheme["Closure"](k_2519, 0);
var v_332 = scheme["list"](new scheme["Symbol"]("guile"));
var v_333 = new scheme["Symbol"]("make-syntax-transformer");
var v_334 = scheme["FALSE"];
var v_335 = scheme["TRUE"];
var v_336 = scheme["primitives"]["cached-module-box"](v_332, v_333, v_334, v_335);
var v_337 = scheme["primitives"]["box-ref"](v_336);
scheme["primitives"]["handle-interrupts"]();
var k_437 = function(v_arg, v_rest) {
var v_338 = v_arg;
var v_339 = v_rest;
var v_340 = scheme["primitives"]["define!"](v_328);
scheme["primitives"]["box-set!"](v_340, v_338);
var v_341 = scheme["primitives"]["box-ref"](v_44);
var v_342 = new scheme["Closure"](k_2602, 0);
scheme["primitives"]["handle-interrupts"]();
var k_444 = function(v_vals) {
var v_343 = v_vals;
var v_344 = new scheme["Symbol"]("wait-condition-variable");
var v_345 = scheme["primitives"]["current-module"]();
var v_346 = 19;
scheme["primitives"]["cache-current-module!"](v_345, v_346);
var v_347 = new scheme["Closure"](k_2615, 0);
var v_348 = scheme["list"](new scheme["Symbol"]("guile"));
var v_349 = new scheme["Symbol"]("make-syntax-transformer");
var v_350 = scheme["FALSE"];
var v_351 = scheme["TRUE"];
var v_352 = scheme["primitives"]["cached-module-box"](v_348, v_349, v_350, v_351);
var v_353 = scheme["primitives"]["box-ref"](v_352);
scheme["primitives"]["handle-interrupts"]();
var k_458 = function(v_arg, v_rest) {
var v_354 = v_arg;
var v_355 = v_rest;
var v_356 = scheme["primitives"]["define!"](v_344);
scheme["primitives"]["box-set!"](v_356, v_354);
var v_357 = scheme["primitives"]["box-ref"](v_44);
var v_358 = new scheme["Closure"](k_2698, 0);
scheme["primitives"]["handle-interrupts"]();
var k_465 = function(v_vals) {
var v_359 = v_vals;
var v_360 = new scheme["Symbol"]("signal-condition-variable");
var v_361 = scheme["primitives"]["current-module"]();
var v_362 = 17;
scheme["primitives"]["cache-current-module!"](v_361, v_362);
var v_363 = new scheme["Closure"](k_2711, 0);
var v_364 = scheme["list"](new scheme["Symbol"]("guile"));
var v_365 = new scheme["Symbol"]("make-syntax-transformer");
var v_366 = scheme["FALSE"];
var v_367 = scheme["TRUE"];
var v_368 = scheme["primitives"]["cached-module-box"](v_364, v_365, v_366, v_367);
var v_369 = scheme["primitives"]["box-ref"](v_368);
scheme["primitives"]["handle-interrupts"]();
var k_479 = function(v_arg, v_rest) {
var v_370 = v_arg;
var v_371 = v_rest;
var v_372 = scheme["primitives"]["define!"](v_360);
scheme["primitives"]["box-set!"](v_372, v_370);
var v_373 = scheme["primitives"]["box-ref"](v_44);
var v_374 = new scheme["Closure"](k_2794, 0);
scheme["primitives"]["handle-interrupts"]();
var k_486 = function(v_vals) {
var v_375 = v_vals;
var v_376 = new scheme["Symbol"]("broadcast-condition-variable");
var v_377 = scheme["primitives"]["current-module"]();
var v_378 = 15;
scheme["primitives"]["cache-current-module!"](v_377, v_378);
var v_379 = new scheme["Closure"](k_2807, 0);
var v_380 = scheme["list"](new scheme["Symbol"]("guile"));
var v_381 = new scheme["Symbol"]("make-syntax-transformer");
var v_382 = scheme["FALSE"];
var v_383 = scheme["TRUE"];
var v_384 = scheme["primitives"]["cached-module-box"](v_380, v_381, v_382, v_383);
var v_385 = scheme["primitives"]["box-ref"](v_384);
scheme["primitives"]["handle-interrupts"]();
var k_500 = function(v_arg, v_rest) {
var v_386 = v_arg;
var v_387 = v_rest;
var v_388 = scheme["primitives"]["define!"](v_376);
scheme["primitives"]["box-set!"](v_388, v_386);
var v_389 = scheme["primitives"]["box-ref"](v_44);
var v_390 = new scheme["Closure"](k_2890, 0);
scheme["primitives"]["handle-interrupts"]();
var k_507 = function(v_vals) {
var v_391 = v_vals;
var v_392 = new scheme["Symbol"]("condition-variable?");
var v_393 = scheme["primitives"]["current-module"]();
var v_394 = 13;
scheme["primitives"]["cache-current-module!"](v_393, v_394);
var v_395 = new scheme["Closure"](k_2903, 0);
var v_396 = scheme["list"](new scheme["Symbol"]("guile"));
var v_397 = new scheme["Symbol"]("make-syntax-transformer");
var v_398 = scheme["FALSE"];
var v_399 = scheme["TRUE"];
var v_400 = scheme["primitives"]["cached-module-box"](v_396, v_397, v_398, v_399);
var v_401 = scheme["primitives"]["box-ref"](v_400);
scheme["primitives"]["handle-interrupts"]();
var k_521 = function(v_arg, v_rest) {
var v_402 = v_arg;
var v_403 = v_rest;
var v_404 = scheme["primitives"]["define!"](v_392);
scheme["primitives"]["box-set!"](v_404, v_402);
var v_405 = scheme["primitives"]["box-ref"](v_44);
var v_406 = new scheme["Closure"](k_2986, 0);
scheme["primitives"]["handle-interrupts"]();
var k_528 = function(v_vals) {
var v_407 = v_vals;
var v_408 = new scheme["Symbol"]("current-thread");
var v_409 = scheme["primitives"]["current-module"]();
var v_410 = 11;
scheme["primitives"]["cache-current-module!"](v_409, v_410);
var v_411 = new scheme["Closure"](k_2999, 0);
var v_412 = scheme["list"](new scheme["Symbol"]("guile"));
var v_413 = new scheme["Symbol"]("make-syntax-transformer");
var v_414 = scheme["FALSE"];
var v_415 = scheme["TRUE"];
var v_416 = scheme["primitives"]["cached-module-box"](v_412, v_413, v_414, v_415);
var v_417 = scheme["primitives"]["box-ref"](v_416);
scheme["primitives"]["handle-interrupts"]();
var k_542 = function(v_arg, v_rest) {
var v_418 = v_arg;
var v_419 = v_rest;
var v_420 = scheme["primitives"]["define!"](v_408);
scheme["primitives"]["box-set!"](v_420, v_418);
var v_421 = scheme["primitives"]["box-ref"](v_44);
var v_422 = new scheme["Closure"](k_3082, 0);
scheme["primitives"]["handle-interrupts"]();
var k_549 = function(v_vals) {
var v_423 = v_vals;
var v_424 = new scheme["Symbol"]("all-threads");
var v_425 = scheme["primitives"]["current-module"]();
var v_426 = 9;
scheme["primitives"]["cache-current-module!"](v_425, v_426);
var v_427 = new scheme["Closure"](k_3095, 0);
var v_428 = scheme["list"](new scheme["Symbol"]("guile"));
var v_429 = new scheme["Symbol"]("make-syntax-transformer");
var v_430 = scheme["FALSE"];
var v_431 = scheme["TRUE"];
var v_432 = scheme["primitives"]["cached-module-box"](v_428, v_429, v_430, v_431);
var v_433 = scheme["primitives"]["box-ref"](v_432);
scheme["primitives"]["handle-interrupts"]();
var k_563 = function(v_arg, v_rest) {
var v_434 = v_arg;
var v_435 = v_rest;
var v_436 = scheme["primitives"]["define!"](v_424);
scheme["primitives"]["box-set!"](v_436, v_434);
var v_437 = scheme["primitives"]["box-ref"](v_44);
var v_438 = new scheme["Closure"](k_3178, 0);
scheme["primitives"]["handle-interrupts"]();
var k_570 = function(v_vals) {
var v_439 = v_vals;
var v_440 = new scheme["Symbol"]("thread-exited?");
var v_441 = scheme["primitives"]["current-module"]();
var v_442 = 7;
scheme["primitives"]["cache-current-module!"](v_441, v_442);
var v_443 = new scheme["Closure"](k_3191, 0);
var v_444 = scheme["list"](new scheme["Symbol"]("guile"));
var v_445 = new scheme["Symbol"]("make-syntax-transformer");
var v_446 = scheme["FALSE"];
var v_447 = scheme["TRUE"];
var v_448 = scheme["primitives"]["cached-module-box"](v_444, v_445, v_446, v_447);
var v_449 = scheme["primitives"]["box-ref"](v_448);
scheme["primitives"]["handle-interrupts"]();
var k_584 = function(v_arg, v_rest) {
var v_450 = v_arg;
var v_451 = v_rest;
var v_452 = scheme["primitives"]["define!"](v_440);
scheme["primitives"]["box-set!"](v_452, v_450);
var v_453 = scheme["primitives"]["box-ref"](v_44);
var v_454 = new scheme["Closure"](k_3274, 0);
scheme["primitives"]["handle-interrupts"]();
var k_591 = function(v_vals) {
var v_455 = v_vals;
var v_456 = new scheme["Symbol"]("total-processor-count");
var v_457 = scheme["primitives"]["current-module"]();
var v_458 = 5;
scheme["primitives"]["cache-current-module!"](v_457, v_458);
var v_459 = new scheme["Closure"](k_3287, 0);
var v_460 = scheme["list"](new scheme["Symbol"]("guile"));
var v_461 = new scheme["Symbol"]("make-syntax-transformer");
var v_462 = scheme["FALSE"];
var v_463 = scheme["TRUE"];
var v_464 = scheme["primitives"]["cached-module-box"](v_460, v_461, v_462, v_463);
var v_465 = scheme["primitives"]["box-ref"](v_464);
scheme["primitives"]["handle-interrupts"]();
var k_605 = function(v_arg, v_rest) {
var v_466 = v_arg;
var v_467 = v_rest;
var v_468 = scheme["primitives"]["define!"](v_456);
scheme["primitives"]["box-set!"](v_468, v_466);
var v_469 = scheme["primitives"]["box-ref"](v_44);
var v_470 = new scheme["Closure"](k_3370, 0);
scheme["primitives"]["handle-interrupts"]();
var k_612 = function(v_vals) {
var v_471 = v_vals;
var v_472 = new scheme["Symbol"]("current-processor-count");
var v_473 = scheme["primitives"]["current-module"]();
var v_474 = 3;
scheme["primitives"]["cache-current-module!"](v_473, v_474);
var v_475 = new scheme["Closure"](k_3383, 0);
var v_476 = scheme["list"](new scheme["Symbol"]("guile"));
var v_477 = new scheme["Symbol"]("make-syntax-transformer");
var v_478 = scheme["FALSE"];
var v_479 = scheme["TRUE"];
var v_480 = scheme["primitives"]["cached-module-box"](v_476, v_477, v_478, v_479);
var v_481 = scheme["primitives"]["box-ref"](v_480);
scheme["primitives"]["handle-interrupts"]();
var k_626 = function(v_arg, v_rest) {
var v_482 = v_arg;
var v_483 = v_rest;
var v_484 = scheme["primitives"]["define!"](v_472);
scheme["primitives"]["box-set!"](v_484, v_482);
var v_485 = scheme["primitives"]["box-ref"](v_44);
var v_486 = new scheme["Closure"](k_3466, 0);
scheme["primitives"]["handle-interrupts"]();
var k_633 = function(v_vals) {
var v_487 = v_vals;
var v_488 = scheme["primitives"]["current-module"]();
var v_489 = 1;
scheme["primitives"]["cache-current-module!"](v_488, v_489);
var v_490 = new scheme["Symbol"]("make-dynamic-state");
var v_491 = scheme["primitives"]["define!"](v_490);
var v_492 = new scheme["Closure"](k_3479, 0);
scheme["primitives"]["box-set!"](v_491, v_492);
var v_493 = scheme["primitives"]["box-ref"](v_44);
var v_494 = new scheme["Closure"](k_3508, 0);
scheme["primitives"]["handle-interrupts"]();
return v_493["fun"](v_493, k_645, v_494);
};
return v_485["fun"](v_485, k_633, v_486);
};
return v_481["fun"](v_481, k_626, v_472, v_19, v_475);
};
return v_469["fun"](v_469, k_612, v_470);
};
return v_465["fun"](v_465, k_605, v_456, v_19, v_459);
};
return v_453["fun"](v_453, k_591, v_454);
};
return v_449["fun"](v_449, k_584, v_440, v_19, v_443);
};
return v_437["fun"](v_437, k_570, v_438);
};
return v_433["fun"](v_433, k_563, v_424, v_19, v_427);
};
return v_421["fun"](v_421, k_549, v_422);
};
return v_417["fun"](v_417, k_542, v_408, v_19, v_411);
};
return v_405["fun"](v_405, k_528, v_406);
};
return v_401["fun"](v_401, k_521, v_392, v_19, v_395);
};
return v_389["fun"](v_389, k_507, v_390);
};
return v_385["fun"](v_385, k_500, v_376, v_19, v_379);
};
return v_373["fun"](v_373, k_486, v_374);
};
return v_369["fun"](v_369, k_479, v_360, v_19, v_363);
};
return v_357["fun"](v_357, k_465, v_358);
};
return v_353["fun"](v_353, k_458, v_344, v_19, v_347);
};
return v_341["fun"](v_341, k_444, v_342);
};
return v_337["fun"](v_337, k_437, v_328, v_19, v_331);
};
return v_325["fun"](v_325, k_423, v_326);
};
return v_321["fun"](v_321, k_416, v_312, v_19, v_315);
};
return v_309["fun"](v_309, k_402, v_310);
};
return v_305["fun"](v_305, k_395, v_296, v_19, v_299);
};
return v_293["fun"](v_293, k_381, v_294);
};
return v_289["fun"](v_289, k_374, v_280, v_19, v_283);
};
return v_277["fun"](v_277, k_360, v_278);
};
return v_273["fun"](v_273, k_353, v_264, v_19, v_267);
};
return v_261["fun"](v_261, k_339, v_262);
};
return v_257["fun"](v_257, k_332, v_248, v_19, v_251);
};
return v_245["fun"](v_245, k_318, v_246);
};
return v_241["fun"](v_241, k_311, v_232, v_19, v_235);
};
return v_229["fun"](v_229, k_297, v_230);
};
return v_225["fun"](v_225, k_290, v_216, v_19, v_219);
};
return v_213["fun"](v_213, k_276, v_214);
};
return v_209["fun"](v_209, k_269, v_200, v_19, v_203);
};
return v_197["fun"](v_197, k_255, v_198);
};
return v_193["fun"](v_193, k_248, v_184, v_19, v_187);
};
return v_181["fun"](v_181, k_234, v_182);
};
return v_177["fun"](v_177, k_227, v_168, v_19, v_171);
};
return v_165["fun"](v_165, k_213, v_166);
};
return v_161["fun"](v_161, k_206, v_152, v_19, v_155);
};
return v_149["fun"](v_149, k_192, v_150);
};
return v_145["fun"](v_145, k_185, v_136, v_19, v_139);
};
return v_133["fun"](v_133, k_171, v_134);
};
return v_129["fun"](v_129, k_164, v_120, v_19, v_123);
};
return v_117["fun"](v_117, k_150, v_118);
};
return v_113["fun"](v_113, k_143, v_104, v_19, v_107);
};
return v_100["fun"](v_100, k_127, v_93, v_19, v_94);
};
return v_89["fun"](v_89, k_114, v_80, v_19, v_83);
};
return v_77["fun"](v_77, k_100, v_78);
};
return v_73["fun"](v_73, k_93, v_64, v_19, v_67);
};
return v_61["fun"](v_61, k_79, v_62);
};
return v_57["fun"](v_57, k_72, v_48, v_19, v_51);
};
return v_45["fun"](v_45, k_58, v_46);
};
return v_39["fun"](v_39, k_49, v_30, v_19, v_33);
};
return v_26["fun"](v_26, k_33, v_18, v_19, v_20);
};
return v_16["fun"](v_16, k_21, v_12);
};
return v_6["fun"](v_6, k_15, v_7, v_8, v_9, v_10, v_11);
};
if (arguments["length"] == 2) {
{
return k_1(v_0);
}
} else {
{
return undefined;
}
}
};
var k_646 = function(v_495, k_674) {
var k_647 = function(v_495, v_x) {
var v_496 = v_x;
var v_497 = scheme["list"](new scheme["Symbol"]("any"), new scheme["Symbol"]("any"), new scheme["Symbol"]("any"), new scheme["Symbol"]("any"));
var v_498 = scheme["list"](new scheme["Symbol"]("guile"));
var v_499 = new scheme["Symbol"]("$sc-dispatch");
var v_500 = scheme["FALSE"];
var v_501 = scheme["TRUE"];
var v_502 = scheme["primitives"]["cached-module-box"](v_498, v_499, v_500, v_501);
var v_503 = scheme["primitives"]["box-ref"](v_502);
scheme["primitives"]["handle-interrupts"]();
var k_657 = function(v_tmp, v_rest) {
var v_504 = v_tmp;
var v_505 = v_rest;
if (scheme["is_true"](v_504)) {
{
var v_514 = new scheme["Closure"](k_675, 0);
var v_515 = 0;
var v_516 = scheme["primitives"]["builtin-ref"](v_515);
scheme["primitives"]["handle-interrupts"]();
return v_516["fun"](v_516, k_674, v_514, v_504);
}
} else {
{
var v_506 = scheme["FALSE"];
var v_507 = new scheme["String"]("source expression failed to match any pattern");
var v_508 = scheme["list"](new scheme["Symbol"]("guile"));
var v_509 = new scheme["Symbol"]("syntax-violation");
var v_510 = scheme["FALSE"];
var v_511 = scheme["TRUE"];
var v_512 = scheme["primitives"]["cached-module-box"](v_508, v_509, v_510, v_511);
var v_513 = scheme["primitives"]["box-ref"](v_512);
scheme["primitives"]["handle-interrupts"]();
return v_513["fun"](v_513, k_674, v_506, v_507, v_496);
}
}
};
return v_503["fun"](v_503, k_657, v_496, v_497);
};
if (arguments["length"] == 3) {
{
return k_647(v_495, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_675 = function(v_517, k_716) {
var k_676 = function(v_517, v_dummy, v_var, v_msg, v_exp) {
var v_518 = v_dummy;
var v_519 = v_var;
var v_520 = v_msg;
var v_521 = v_exp;
var v_522 = scheme["Syntax"](
new scheme["Symbol"]("begin"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_523 = scheme["Syntax"](
new scheme["Symbol"]("define-syntax"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_524 = scheme["Syntax"](
new scheme["Symbol"]("lambda"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_525 = scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
);
var v_526 = scheme["EMPTY"];
var v_527 = scheme["primitives"]["cons"](v_520, v_526);
var v_528 = scheme["Syntax"](
new scheme["Symbol"]("issue-deprecation-warning"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_529 = scheme["primitives"]["cons"](v_528, v_527);
var v_530 = scheme["Syntax"](
new scheme["Symbol"]("syntax-case"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_531 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_532 = scheme["list"](
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("id"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("arg"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("..."),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
),
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("syntax"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["list"](
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("id"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
)
),
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("arg"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("..."),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
)
)
)
);
var v_533 = scheme["Syntax"](
new scheme["Symbol"]("id"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_534 = scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("identifier?"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("syntax"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("id"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
)
);
var v_535 = scheme["primitives"]["cons"](v_521, v_526);
var v_536 = scheme["Syntax"](
new scheme["Symbol"]("syntax"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_537 = scheme["primitives"]["cons"](v_536, v_535);
var v_538 = scheme["primitives"]["cons"](v_537, v_526);
var v_539 = scheme["primitives"]["cons"](v_534, v_538);
var v_540 = scheme["primitives"]["cons"](v_533, v_539);
var v_541 = scheme["primitives"]["cons"](v_540, v_526);
var v_542 = scheme["primitives"]["cons"](v_532, v_541);
var v_543 = scheme["primitives"]["cons"](v_526, v_542);
var v_544 = scheme["primitives"]["cons"](v_531, v_543);
var v_545 = scheme["primitives"]["cons"](v_530, v_544);
var v_546 = scheme["primitives"]["cons"](v_545, v_526);
var v_547 = scheme["primitives"]["cons"](v_529, v_546);
var v_548 = scheme["primitives"]["cons"](v_525, v_547);
var v_549 = scheme["primitives"]["cons"](v_524, v_548);
var v_550 = scheme["primitives"]["cons"](v_549, v_526);
var v_551 = scheme["primitives"]["cons"](v_519, v_550);
var v_552 = scheme["primitives"]["cons"](v_523, v_551);
var v_553 = scheme["primitives"]["cons"](v_519, v_526);
var v_554 = scheme["Syntax"](
new scheme["Symbol"]("export"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_555 = scheme["primitives"]["cons"](v_554, v_553);
var v_556 = scheme["primitives"]["cons"](v_555, v_526);
var v_557 = scheme["primitives"]["cons"](v_552, v_556);
var v_558 = scheme["primitives"]["cons"](v_522, v_557);
scheme["primitives"]["handle-interrupts"]();
return k_716(v_558);
};
if (arguments["length"] == 6) {
{
return k_676(v_517, arguments[2], arguments[3], arguments[4], arguments[5]);
}
} else {
{
return undefined;
}
}
};
var k_717 = function(v_559, k_768) {
var k_718 = function(v_559, v_x) {
var v_560 = v_x;
var v_561 = new scheme["Symbol"]("issue-deprecation-warning");
var v_562 = scheme["TRUE"];
var v_563 = 57;
var v_564 = scheme["primitives"]["cached-toplevel-box"](v_563, v_561, v_562);
var v_565 = scheme["primitives"]["box-ref"](v_564);
var v_566 = new scheme["String"]("`_IONBF' is deprecated. Use the symbol 'none instead.");
scheme["primitives"]["handle-interrupts"]();
var k_727 = function(v_vals) {
var v_567 = v_vals;
var v_568 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_569 = scheme["list"](new scheme["Symbol"]("guile"));
var v_570 = new scheme["Symbol"]("$sc-dispatch");
var v_571 = scheme["FALSE"];
var v_572 = scheme["TRUE"];
var v_573 = scheme["primitives"]["cached-module-box"](v_569, v_570, v_571, v_572);
var v_574 = scheme["primitives"]["box-ref"](v_573);
scheme["primitives"]["handle-interrupts"]();
var k_737 = function(v_tmp, v_rest) {
var v_575 = v_tmp;
var v_576 = v_rest;
if (scheme["is_true"](v_575)) {
{
var v_595 = new scheme["Closure"](k_785, 0);
var v_596 = 0;
var v_597 = scheme["primitives"]["builtin-ref"](v_596);
scheme["primitives"]["handle-interrupts"]();
return v_597["fun"](v_597, k_768, v_595, v_575);
}
} else {
{
var v_577 = scheme["EMPTY"];
var v_578 = scheme["primitives"]["cons"](v_560, v_577);
var v_579 = new scheme["Closure"](k_769, 0);
var v_580 = 0;
var v_581 = scheme["primitives"]["builtin-ref"](v_580);
scheme["primitives"]["handle-interrupts"]();
var k_746 = function(v_arg, v_rest) {
var v_582 = v_arg;
var v_583 = v_rest;
if (scheme["is_true"](v_582)) {
{
var v_592 = new scheme["Closure"](k_779, 0);
var v_593 = 0;
var v_594 = scheme["primitives"]["builtin-ref"](v_593);
scheme["primitives"]["handle-interrupts"]();
return v_594["fun"](v_594, k_768, v_592, v_578);
}
} else {
{
var v_584 = scheme["FALSE"];
var v_585 = new scheme["String"]("source expression failed to match any pattern");
var v_586 = scheme["list"](new scheme["Symbol"]("guile"));
var v_587 = new scheme["Symbol"]("syntax-violation");
var v_588 = scheme["FALSE"];
var v_589 = scheme["TRUE"];
var v_590 = scheme["primitives"]["cached-module-box"](v_586, v_587, v_588, v_589);
var v_591 = scheme["primitives"]["box-ref"](v_590);
scheme["primitives"]["handle-interrupts"]();
return v_591["fun"](v_591, k_768, v_584, v_585, v_560);
}
}
};
return v_581["fun"](v_581, k_746, v_579, v_578);
}
}
};
return v_574["fun"](v_574, k_737, v_560, v_568);
};
return v_565["fun"](v_565, k_727, v_566);
};
if (arguments["length"] == 3) {
{
return k_718(v_559, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_769 = function(v_598, k_778) {
var k_770 = function(v_598, v_id) {
var v_599 = v_id;
var v_600 = new scheme["Symbol"]("identifier?");
var v_601 = scheme["TRUE"];
var v_602 = 57;
var v_603 = scheme["primitives"]["cached-toplevel-box"](v_602, v_600, v_601);
var v_604 = scheme["primitives"]["box-ref"](v_603);
scheme["primitives"]["handle-interrupts"]();
return v_604["fun"](v_604, k_778, v_599);
};
if (arguments["length"] == 3) {
{
return k_770(v_598, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_779 = function(v_605, k_784) {
var k_780 = function(v_605, v_id) {
var v_606 = v_id;
var v_607 = scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("quote"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-1d"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-12"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("none"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-1d"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-12"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
);
scheme["primitives"]["handle-interrupts"]();
return k_784(v_607);
};
if (arguments["length"] == 3) {
{
return k_780(v_605, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_785 = function(v_608, k_799) {
var k_786 = function(v_608, v_id, v_arg) {
var v_609 = v_id;
var v_610 = v_arg;
var v_611 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-15"), new scheme["String"]("l-1e3d92e2925abd71-16"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-12"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_612 = scheme["EMPTY"];
var v_613 = scheme["primitives"]["cons"](v_609, v_612);
var v_614 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-15"), new scheme["String"]("l-1e3d92e2925abd71-16"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-f"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-12"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IONBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IONBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_615 = scheme["primitives"]["cons"](v_614, v_613);
var v_616 = scheme["primitives"]["cons"](v_615, v_612);
var v_617 = scheme["primitives"]["cons"](v_614, v_610);
var v_618 = scheme["primitives"]["cons"](v_617, v_612);
var v_619 = scheme["primitives"]["cons"](v_616, v_618);
var v_620 = scheme["primitives"]["cons"](v_611, v_619);
scheme["primitives"]["handle-interrupts"]();
return k_799(v_620);
};
if (arguments["length"] == 4) {
{
return k_786(v_608, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_800 = function(v_621, k_812) {
var k_801 = function(v_621) {
var v_622 = scheme["list"](new scheme["Symbol"]("guile"));
var v_623 = new scheme["Symbol"]("module-export!");
var v_624 = scheme["FALSE"];
var v_625 = scheme["TRUE"];
var v_626 = scheme["primitives"]["cached-module-box"](v_622, v_623, v_624, v_625);
var v_627 = scheme["primitives"]["box-ref"](v_626);
var v_628 = scheme["primitives"]["current-module"]();
var v_629 = scheme["list"](new scheme["Symbol"]("_IONBF"));
scheme["primitives"]["handle-interrupts"]();
return v_627["fun"](v_627, k_812, v_628, v_629);
};
if (arguments["length"] == 2) {
{
return k_801(v_621);
}
} else {
{
return undefined;
}
}
};
var k_813 = function(v_630, k_864) {
var k_814 = function(v_630, v_x) {
var v_631 = v_x;
var v_632 = new scheme["Symbol"]("issue-deprecation-warning");
var v_633 = scheme["TRUE"];
var v_634 = 55;
var v_635 = scheme["primitives"]["cached-toplevel-box"](v_634, v_632, v_633);
var v_636 = scheme["primitives"]["box-ref"](v_635);
var v_637 = new scheme["String"]("`_IOLBF' is deprecated. Use the symbol 'line instead.");
scheme["primitives"]["handle-interrupts"]();
var k_823 = function(v_vals) {
var v_638 = v_vals;
var v_639 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_640 = scheme["list"](new scheme["Symbol"]("guile"));
var v_641 = new scheme["Symbol"]("$sc-dispatch");
var v_642 = scheme["FALSE"];
var v_643 = scheme["TRUE"];
var v_644 = scheme["primitives"]["cached-module-box"](v_640, v_641, v_642, v_643);
var v_645 = scheme["primitives"]["box-ref"](v_644);
scheme["primitives"]["handle-interrupts"]();
var k_833 = function(v_tmp, v_rest) {
var v_646 = v_tmp;
var v_647 = v_rest;
if (scheme["is_true"](v_646)) {
{
var v_666 = new scheme["Closure"](k_881, 0);
var v_667 = 0;
var v_668 = scheme["primitives"]["builtin-ref"](v_667);
scheme["primitives"]["handle-interrupts"]();
return v_668["fun"](v_668, k_864, v_666, v_646);
}
} else {
{
var v_648 = scheme["EMPTY"];
var v_649 = scheme["primitives"]["cons"](v_631, v_648);
var v_650 = new scheme["Closure"](k_865, 0);
var v_651 = 0;
var v_652 = scheme["primitives"]["builtin-ref"](v_651);
scheme["primitives"]["handle-interrupts"]();
var k_842 = function(v_arg, v_rest) {
var v_653 = v_arg;
var v_654 = v_rest;
if (scheme["is_true"](v_653)) {
{
var v_663 = new scheme["Closure"](k_875, 0);
var v_664 = 0;
var v_665 = scheme["primitives"]["builtin-ref"](v_664);
scheme["primitives"]["handle-interrupts"]();
return v_665["fun"](v_665, k_864, v_663, v_649);
}
} else {
{
var v_655 = scheme["FALSE"];
var v_656 = new scheme["String"]("source expression failed to match any pattern");
var v_657 = scheme["list"](new scheme["Symbol"]("guile"));
var v_658 = new scheme["Symbol"]("syntax-violation");
var v_659 = scheme["FALSE"];
var v_660 = scheme["TRUE"];
var v_661 = scheme["primitives"]["cached-module-box"](v_657, v_658, v_659, v_660);
var v_662 = scheme["primitives"]["box-ref"](v_661);
scheme["primitives"]["handle-interrupts"]();
return v_662["fun"](v_662, k_864, v_655, v_656, v_631);
}
}
};
return v_652["fun"](v_652, k_842, v_650, v_649);
}
}
};
return v_645["fun"](v_645, k_833, v_631, v_639);
};
return v_636["fun"](v_636, k_823, v_637);
};
if (arguments["length"] == 3) {
{
return k_814(v_630, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_865 = function(v_669, k_874) {
var k_866 = function(v_669, v_id) {
var v_670 = v_id;
var v_671 = new scheme["Symbol"]("identifier?");
var v_672 = scheme["TRUE"];
var v_673 = 55;
var v_674 = scheme["primitives"]["cached-toplevel-box"](v_673, v_671, v_672);
var v_675 = scheme["primitives"]["box-ref"](v_674);
scheme["primitives"]["handle-interrupts"]();
return v_675["fun"](v_675, k_874, v_670);
};
if (arguments["length"] == 3) {
{
return k_866(v_669, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_875 = function(v_676, k_880) {
var k_876 = function(v_676, v_id) {
var v_677 = v_id;
var v_678 = scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("quote"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-2e"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-23"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("line"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-2e"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-23"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
);
scheme["primitives"]["handle-interrupts"]();
return k_880(v_678);
};
if (arguments["length"] == 3) {
{
return k_876(v_676, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_881 = function(v_679, k_895) {
var k_882 = function(v_679, v_id, v_arg) {
var v_680 = v_id;
var v_681 = v_arg;
var v_682 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-26"), new scheme["String"]("l-1e3d92e2925abd71-27"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-23"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_683 = scheme["EMPTY"];
var v_684 = scheme["primitives"]["cons"](v_680, v_683);
var v_685 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-26"), new scheme["String"]("l-1e3d92e2925abd71-27"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-20"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-23"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOLBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOLBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_686 = scheme["primitives"]["cons"](v_685, v_684);
var v_687 = scheme["primitives"]["cons"](v_686, v_683);
var v_688 = scheme["primitives"]["cons"](v_685, v_681);
var v_689 = scheme["primitives"]["cons"](v_688, v_683);
var v_690 = scheme["primitives"]["cons"](v_687, v_689);
var v_691 = scheme["primitives"]["cons"](v_682, v_690);
scheme["primitives"]["handle-interrupts"]();
return k_895(v_691);
};
if (arguments["length"] == 4) {
{
return k_882(v_679, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_896 = function(v_692, k_908) {
var k_897 = function(v_692) {
var v_693 = scheme["list"](new scheme["Symbol"]("guile"));
var v_694 = new scheme["Symbol"]("module-export!");
var v_695 = scheme["FALSE"];
var v_696 = scheme["TRUE"];
var v_697 = scheme["primitives"]["cached-module-box"](v_693, v_694, v_695, v_696);
var v_698 = scheme["primitives"]["box-ref"](v_697);
var v_699 = scheme["primitives"]["current-module"]();
var v_700 = scheme["list"](new scheme["Symbol"]("_IOLBF"));
scheme["primitives"]["handle-interrupts"]();
return v_698["fun"](v_698, k_908, v_699, v_700);
};
if (arguments["length"] == 2) {
{
return k_897(v_692);
}
} else {
{
return undefined;
}
}
};
var k_909 = function(v_701, k_960) {
var k_910 = function(v_701, v_x) {
var v_702 = v_x;
var v_703 = new scheme["Symbol"]("issue-deprecation-warning");
var v_704 = scheme["TRUE"];
var v_705 = 53;
var v_706 = scheme["primitives"]["cached-toplevel-box"](v_705, v_703, v_704);
var v_707 = scheme["primitives"]["box-ref"](v_706);
var v_708 = new scheme["String"]("`_IOFBF' is deprecated. Use the symbol 'block instead.");
scheme["primitives"]["handle-interrupts"]();
var k_919 = function(v_vals) {
var v_709 = v_vals;
var v_710 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_711 = scheme["list"](new scheme["Symbol"]("guile"));
var v_712 = new scheme["Symbol"]("$sc-dispatch");
var v_713 = scheme["FALSE"];
var v_714 = scheme["TRUE"];
var v_715 = scheme["primitives"]["cached-module-box"](v_711, v_712, v_713, v_714);
var v_716 = scheme["primitives"]["box-ref"](v_715);
scheme["primitives"]["handle-interrupts"]();
var k_929 = function(v_tmp, v_rest) {
var v_717 = v_tmp;
var v_718 = v_rest;
if (scheme["is_true"](v_717)) {
{
var v_737 = new scheme["Closure"](k_977, 0);
var v_738 = 0;
var v_739 = scheme["primitives"]["builtin-ref"](v_738);
scheme["primitives"]["handle-interrupts"]();
return v_739["fun"](v_739, k_960, v_737, v_717);
}
} else {
{
var v_719 = scheme["EMPTY"];
var v_720 = scheme["primitives"]["cons"](v_702, v_719);
var v_721 = new scheme["Closure"](k_961, 0);
var v_722 = 0;
var v_723 = scheme["primitives"]["builtin-ref"](v_722);
scheme["primitives"]["handle-interrupts"]();
var k_938 = function(v_arg, v_rest) {
var v_724 = v_arg;
var v_725 = v_rest;
if (scheme["is_true"](v_724)) {
{
var v_734 = new scheme["Closure"](k_971, 0);
var v_735 = 0;
var v_736 = scheme["primitives"]["builtin-ref"](v_735);
scheme["primitives"]["handle-interrupts"]();
return v_736["fun"](v_736, k_960, v_734, v_720);
}
} else {
{
var v_726 = scheme["FALSE"];
var v_727 = new scheme["String"]("source expression failed to match any pattern");
var v_728 = scheme["list"](new scheme["Symbol"]("guile"));
var v_729 = new scheme["Symbol"]("syntax-violation");
var v_730 = scheme["FALSE"];
var v_731 = scheme["TRUE"];
var v_732 = scheme["primitives"]["cached-module-box"](v_728, v_729, v_730, v_731);
var v_733 = scheme["primitives"]["box-ref"](v_732);
scheme["primitives"]["handle-interrupts"]();
return v_733["fun"](v_733, k_960, v_726, v_727, v_702);
}
}
};
return v_723["fun"](v_723, k_938, v_721, v_720);
}
}
};
return v_716["fun"](v_716, k_929, v_702, v_710);
};
return v_707["fun"](v_707, k_919, v_708);
};
if (arguments["length"] == 3) {
{
return k_910(v_701, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_961 = function(v_740, k_970) {
var k_962 = function(v_740, v_id) {
var v_741 = v_id;
var v_742 = new scheme["Symbol"]("identifier?");
var v_743 = scheme["TRUE"];
var v_744 = 53;
var v_745 = scheme["primitives"]["cached-toplevel-box"](v_744, v_742, v_743);
var v_746 = scheme["primitives"]["box-ref"](v_745);
scheme["primitives"]["handle-interrupts"]();
return v_746["fun"](v_746, k_970, v_741);
};
if (arguments["length"] == 3) {
{
return k_962(v_740, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_971 = function(v_747, k_976) {
var k_972 = function(v_747, v_id) {
var v_748 = v_id;
var v_749 = scheme["list"](
scheme["Syntax"](
new scheme["Symbol"]("quote"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-3f"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-34"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
),
scheme["Syntax"](
new scheme["Symbol"]("block"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-3f"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-34"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
)
);
scheme["primitives"]["handle-interrupts"]();
return k_976(v_749);
};
if (arguments["length"] == 3) {
{
return k_972(v_747, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_977 = function(v_750, k_991) {
var k_978 = function(v_750, v_id, v_arg) {
var v_751 = v_id;
var v_752 = v_arg;
var v_753 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-37"), new scheme["String"]("l-1e3d92e2925abd71-38"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-34"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_754 = scheme["EMPTY"];
var v_755 = scheme["primitives"]["cons"](v_751, v_754);
var v_756 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-37"), new scheme["String"]("l-1e3d92e2925abd71-38"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-31"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-34"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("_IOFBF")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("_IOFBF"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_757 = scheme["primitives"]["cons"](v_756, v_755);
var v_758 = scheme["primitives"]["cons"](v_757, v_754);
var v_759 = scheme["primitives"]["cons"](v_756, v_752);
var v_760 = scheme["primitives"]["cons"](v_759, v_754);
var v_761 = scheme["primitives"]["cons"](v_758, v_760);
var v_762 = scheme["primitives"]["cons"](v_753, v_761);
scheme["primitives"]["handle-interrupts"]();
return k_991(v_762);
};
if (arguments["length"] == 4) {
{
return k_978(v_750, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_992 = function(v_763, k_1004) {
var k_993 = function(v_763) {
var v_764 = scheme["list"](new scheme["Symbol"]("guile"));
var v_765 = new scheme["Symbol"]("module-export!");
var v_766 = scheme["FALSE"];
var v_767 = scheme["TRUE"];
var v_768 = scheme["primitives"]["cached-module-box"](v_764, v_765, v_766, v_767);
var v_769 = scheme["primitives"]["box-ref"](v_768);
var v_770 = scheme["primitives"]["current-module"]();
var v_771 = scheme["list"](new scheme["Symbol"]("_IOFBF"));
scheme["primitives"]["handle-interrupts"]();
return v_769["fun"](v_769, k_1004, v_770, v_771);
};
if (arguments["length"] == 2) {
{
return k_993(v_763);
}
} else {
{
return undefined;
}
}
};
var k_1005 = function(v_772, k_1033) {
var k_1006 = function(v_772, v_stx) {
var v_773 = v_stx;
var v_774 = scheme["list"](new scheme["Symbol"]("_"), new scheme["Symbol"]("any"));
var v_775 = scheme["list"](new scheme["Symbol"]("guile"));
var v_776 = new scheme["Symbol"]("$sc-dispatch");
var v_777 = scheme["FALSE"];
var v_778 = scheme["TRUE"];
var v_779 = scheme["primitives"]["cached-module-box"](v_775, v_776, v_777, v_778);
var v_780 = scheme["primitives"]["box-ref"](v_779);
scheme["primitives"]["handle-interrupts"]();
var k_1016 = function(v_tmp, v_rest) {
var v_781 = v_tmp;
var v_782 = v_rest;
if (scheme["is_true"](v_781)) {
{
var v_791 = new scheme["Closure"](k_1034, 0);
var v_792 = 0;
var v_793 = scheme["primitives"]["builtin-ref"](v_792);
scheme["primitives"]["handle-interrupts"]();
return v_793["fun"](v_793, k_1033, v_791, v_781);
}
} else {
{
var v_783 = scheme["FALSE"];
var v_784 = new scheme["String"]("source expression failed to match any pattern");
var v_785 = scheme["list"](new scheme["Symbol"]("guile"));
var v_786 = new scheme["Symbol"]("syntax-violation");
var v_787 = scheme["FALSE"];
var v_788 = scheme["TRUE"];
var v_789 = scheme["primitives"]["cached-module-box"](v_785, v_786, v_787, v_788);
var v_790 = scheme["primitives"]["box-ref"](v_789);
scheme["primitives"]["handle-interrupts"]();
return v_790["fun"](v_790, k_1033, v_783, v_784, v_773);
}
}
};
return v_780["fun"](v_780, k_1016, v_773, v_774);
};
if (arguments["length"] == 3) {
{
return k_1006(v_772, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1034 = function(v_794, k_1106) {
var k_1035 = function(v_794, v_name) {
var v_795 = v_name;
var v_796 = new scheme["Symbol"]("datum->syntax");
var v_797 = scheme["TRUE"];
var v_798 = 51;
var v_799 = scheme["primitives"]["cached-toplevel-box"](v_798, v_796, v_797);
var v_800 = scheme["primitives"]["box-ref"](v_799);
var v_801 = new scheme["Symbol"]("symbol-append");
var v_802 = scheme["primitives"]["cached-toplevel-box"](v_798, v_801, v_797);
var v_803 = scheme["primitives"]["box-ref"](v_802);
var v_804 = new scheme["Symbol"]("threads:");
var v_805 = new scheme["Symbol"]("syntax->datum");
var v_806 = scheme["primitives"]["cached-toplevel-box"](v_798, v_805, v_797);
var v_807 = scheme["primitives"]["box-ref"](v_806);
scheme["primitives"]["handle-interrupts"]();
var k_1050 = function(v_arg, v_rest) {
var v_808 = v_arg;
var v_809 = v_rest;
scheme["primitives"]["handle-interrupts"]();
var k_1053 = function(v_arg, v_rest) {
var v_810 = v_arg;
var v_811 = v_rest;
scheme["primitives"]["handle-interrupts"]();
var k_1056 = function(v_arg, v_rest) {
var v_812 = v_arg;
var v_813 = v_rest;
var v_814 = new scheme["Symbol"]("string-append");
var v_815 = scheme["primitives"]["cached-toplevel-box"](v_798, v_814, v_797);
var v_816 = scheme["primitives"]["box-ref"](v_815);
var v_817 = new scheme["String"]("Import (ice-9 threads) to have access to `");
var v_818 = new scheme["Symbol"]("symbol->string");
var v_819 = scheme["primitives"]["cached-toplevel-box"](v_798, v_818, v_797);
var v_820 = scheme["primitives"]["box-ref"](v_819);
var v_821 = scheme["primitives"]["box-ref"](v_806);
scheme["primitives"]["handle-interrupts"]();
var k_1067 = function(v_arg, v_rest) {
var v_822 = v_arg;
var v_823 = v_rest;
scheme["primitives"]["handle-interrupts"]();
var k_1070 = function(v_arg, v_rest) {
var v_824 = v_arg;
var v_825 = v_rest;
var v_826 = new scheme["String"]("'.");
scheme["primitives"]["handle-interrupts"]();
var k_1074 = function(v_arg, v_rest) {
var v_827 = v_arg;
var v_828 = v_rest;
var v_829 = scheme["EMPTY"];
var v_830 = scheme["primitives"]["cons"](v_827, v_829);
var v_831 = scheme["primitives"]["cons"](v_812, v_830);
var v_832 = scheme["list"](new scheme["Symbol"]("any"), new scheme["Symbol"]("any"));
var v_833 = scheme["list"](new scheme["Symbol"]("guile"));
var v_834 = new scheme["Symbol"]("$sc-dispatch");
var v_835 = scheme["FALSE"];
var v_836 = scheme["TRUE"];
var v_837 = scheme["primitives"]["cached-module-box"](v_833, v_834, v_835, v_836);
var v_838 = scheme["primitives"]["box-ref"](v_837);
scheme["primitives"]["handle-interrupts"]();
var k_1087 = function(v_tmp, v_rest) {
var v_839 = v_tmp;
var v_840 = v_rest;
if (scheme["is_true"](v_839)) {
{
var v_849 = new scheme["Closure"](k_1107, 1);
var v_850 = 0;
scheme["primitives"]["free-set!"](v_849, v_850, v_795);
var v_851 = 0;
var v_852 = scheme["primitives"]["builtin-ref"](v_851);
scheme["primitives"]["handle-interrupts"]();
return v_852["fun"](v_852, k_1106, v_849, v_839);
}
} else {
{
var v_841 = scheme["FALSE"];
var v_842 = new scheme["String"]("source expression failed to match any pattern");
var v_843 = scheme["list"](new scheme["Symbol"]("guile"));
var v_844 = new scheme["Symbol"]("syntax-violation");
var v_845 = scheme["FALSE"];
var v_846 = scheme["TRUE"];
var v_847 = scheme["primitives"]["cached-module-box"](v_843, v_844, v_845, v_846);
var v_848 = scheme["primitives"]["box-ref"](v_847);
scheme["primitives"]["handle-interrupts"]();
return v_848["fun"](v_848, k_1106, v_841, v_842, v_831);
}
}
};
return v_838["fun"](v_838, k_1087, v_831, v_832);
};
return v_816["fun"](v_816, k_1074, v_817, v_824, v_826);
};
return v_820["fun"](v_820, k_1070, v_822);
};
return v_821["fun"](v_821, k_1067, v_795);
};
return v_800["fun"](v_800, k_1056, v_795, v_810);
};
return v_803["fun"](v_803, k_1053, v_804, v_808);
};
return v_807["fun"](v_807, k_1050, v_795);
};
if (arguments["length"] == 3) {
{
return k_1035(v_794, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1107 = function(v_853, k_1119) {
var k_1108 = function(v_853, v_name_s, v_warning) {
var v_854 = v_name_s;
var v_855 = v_warning;
var v_856 = scheme["EMPTY"];
var v_857 = scheme["primitives"]["cons"](v_854, v_856);
var v_858 = scheme["primitives"]["cons"](v_855, v_857);
var v_859 = 0;
var v_860 = scheme["primitives"]["free-ref"](v_853, v_859);
var v_861 = scheme["primitives"]["cons"](v_860, v_858);
var v_862 = scheme["Syntax"](
new scheme["Symbol"]("define-deprecated"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("name*"), new scheme["Symbol"]("warning")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-50"), new scheme["String"]("l-1e3d92e2925abd71-51"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("name")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4b"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("threads-name")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["String"]("l-1e3d92e2925abd71-45"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("stx")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-44"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated/threads")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated/threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_863 = scheme["primitives"]["cons"](v_862, v_861);
scheme["primitives"]["handle-interrupts"]();
return k_1119(v_863);
};
if (arguments["length"] == 4) {
{
return k_1108(v_853, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1120 = function(v_864, k_1148) {
var k_1121 = function(v_864, v_x) {
var v_865 = v_x;
var v_866 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_867 = scheme["list"](new scheme["Symbol"]("guile"));
var v_868 = new scheme["Symbol"]("$sc-dispatch");
var v_869 = scheme["FALSE"];
var v_870 = scheme["TRUE"];
var v_871 = scheme["primitives"]["cached-module-box"](v_867, v_868, v_869, v_870);
var v_872 = scheme["primitives"]["box-ref"](v_871);
scheme["primitives"]["handle-interrupts"]();
var k_1131 = function(v_tmp, v_rest) {
var v_873 = v_tmp;
var v_874 = v_rest;
if (scheme["is_true"](v_873)) {
{
var v_883 = new scheme["Closure"](k_1149, 0);
var v_884 = 0;
var v_885 = scheme["primitives"]["builtin-ref"](v_884);
scheme["primitives"]["handle-interrupts"]();
return v_885["fun"](v_885, k_1148, v_883, v_873);
}
} else {
{
var v_875 = scheme["FALSE"];
var v_876 = new scheme["String"]("source expression failed to match any pattern");
var v_877 = scheme["list"](new scheme["Symbol"]("guile"));
var v_878 = new scheme["Symbol"]("syntax-violation");
var v_879 = scheme["FALSE"];
var v_880 = scheme["TRUE"];
var v_881 = scheme["primitives"]["cached-module-box"](v_877, v_878, v_879, v_880);
var v_882 = scheme["primitives"]["box-ref"](v_881);
scheme["primitives"]["handle-interrupts"]();
return v_882["fun"](v_882, k_1148, v_875, v_876, v_865);
}
}
};
return v_872["fun"](v_872, k_1131, v_865, v_866);
};
if (arguments["length"] == 3) {
{
return k_1121(v_864, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1149 = function(v_886, k_1165) {
var k_1150 = function(v_886, v_dummy, v_name) {
var v_887 = v_dummy;
var v_888 = v_name;
var v_889 = scheme["Syntax"](
new scheme["Symbol"]("begin"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("name")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-56"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-5b"), new scheme["String"]("l-1e3d92e2925abd71-5c"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-56"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-58"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated/threads*")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated/threads*"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated/threads*")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated/threads*"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_890 = new scheme["Closure"](k_1166, 0);
var v_891 = scheme["list"](new scheme["Symbol"]("guile"));
var v_892 = new scheme["Symbol"]("map");
var v_893 = scheme["FALSE"];
var v_894 = scheme["TRUE"];
var v_895 = scheme["primitives"]["cached-module-box"](v_891, v_892, v_893, v_894);
var v_896 = scheme["primitives"]["box-ref"](v_895);
scheme["primitives"]["handle-interrupts"]();
var k_1161 = function(v_arg, v_rest) {
var v_897 = v_arg;
var v_898 = v_rest;
var v_899 = scheme["primitives"]["cons"](v_889, v_897);
scheme["primitives"]["handle-interrupts"]();
return k_1165(v_899);
};
return v_896["fun"](v_896, k_1161, v_890, v_888);
};
if (arguments["length"] == 4) {
{
return k_1150(v_886, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1166 = function(v_900, k_1174) {
var k_1167 = function(v_900, v_tmp_h1e3d92e2925abd71_h5f) {
var v_901 = v_tmp_h1e3d92e2925abd71_h5f;
var v_902 = scheme["EMPTY"];
var v_903 = scheme["primitives"]["cons"](v_901, v_902);
var v_904 = scheme["Syntax"](
new scheme["Symbol"]("define-deprecated/threads"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("name")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-56"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-5b"), new scheme["String"]("l-1e3d92e2925abd71-5c"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-56"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-58"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated/threads*")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated/threads*"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated/threads*")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated/threads*"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_905 = scheme["primitives"]["cons"](v_904, v_903);
scheme["primitives"]["handle-interrupts"]();
return k_1174(v_905);
};
if (arguments["length"] == 3) {
{
return k_1167(v_900, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1175 = function(v_906, k_1226) {
var k_1176 = function(v_906, v_x) {
var v_907 = v_x;
var v_908 = new scheme["Symbol"]("issue-deprecation-warning");
var v_909 = scheme["TRUE"];
var v_910 = 49;
var v_911 = scheme["primitives"]["cached-toplevel-box"](v_910, v_908, v_909);
var v_912 = scheme["primitives"]["box-ref"](v_911);
var v_913 = new scheme["String"]("Import (ice-9 threads) to have access to `call-with-new-thread'.");
scheme["primitives"]["handle-interrupts"]();
var k_1185 = function(v_vals) {
var v_914 = v_vals;
var v_915 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_916 = scheme["list"](new scheme["Symbol"]("guile"));
var v_917 = new scheme["Symbol"]("$sc-dispatch");
var v_918 = scheme["FALSE"];
var v_919 = scheme["TRUE"];
var v_920 = scheme["primitives"]["cached-module-box"](v_916, v_917, v_918, v_919);
var v_921 = scheme["primitives"]["box-ref"](v_920);
scheme["primitives"]["handle-interrupts"]();
var k_1195 = function(v_tmp, v_rest) {
var v_922 = v_tmp;
var v_923 = v_rest;
if (scheme["is_true"](v_922)) {
{
var v_942 = new scheme["Closure"](k_1243, 0);
var v_943 = 0;
var v_944 = scheme["primitives"]["builtin-ref"](v_943);
scheme["primitives"]["handle-interrupts"]();
return v_944["fun"](v_944, k_1226, v_942, v_922);
}
} else {
{
var v_924 = scheme["EMPTY"];
var v_925 = scheme["primitives"]["cons"](v_907, v_924);
var v_926 = new scheme["Closure"](k_1227, 0);
var v_927 = 0;
var v_928 = scheme["primitives"]["builtin-ref"](v_927);
scheme["primitives"]["handle-interrupts"]();
var k_1204 = function(v_arg, v_rest) {
var v_929 = v_arg;
var v_930 = v_rest;
if (scheme["is_true"](v_929)) {
{
var v_939 = new scheme["Closure"](k_1237, 0);
var v_940 = 0;
var v_941 = scheme["primitives"]["builtin-ref"](v_940);
scheme["primitives"]["handle-interrupts"]();
return v_941["fun"](v_941, k_1226, v_939, v_925);
}
} else {
{
var v_931 = scheme["FALSE"];
var v_932 = new scheme["String"]("source expression failed to match any pattern");
var v_933 = scheme["list"](new scheme["Symbol"]("guile"));
var v_934 = new scheme["Symbol"]("syntax-violation");
var v_935 = scheme["FALSE"];
var v_936 = scheme["TRUE"];
var v_937 = scheme["primitives"]["cached-module-box"](v_933, v_934, v_935, v_936);
var v_938 = scheme["primitives"]["box-ref"](v_937);
scheme["primitives"]["handle-interrupts"]();
return v_938["fun"](v_938, k_1226, v_931, v_932, v_907);
}
}
};
return v_928["fun"](v_928, k_1204, v_926, v_925);
}
}
};
return v_921["fun"](v_921, k_1195, v_907, v_915);
};
return v_912["fun"](v_912, k_1185, v_913);
};
if (arguments["length"] == 3) {
{
return k_1176(v_906, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1227 = function(v_945, k_1236) {
var k_1228 = function(v_945, v_id) {
var v_946 = v_id;
var v_947 = new scheme["Symbol"]("identifier?");
var v_948 = scheme["TRUE"];
var v_949 = 49;
var v_950 = scheme["primitives"]["cached-toplevel-box"](v_949, v_947, v_948);
var v_951 = scheme["primitives"]["box-ref"](v_950);
scheme["primitives"]["handle-interrupts"]();
return v_951["fun"](v_951, k_1236, v_946);
};
if (arguments["length"] == 3) {
{
return k_1228(v_945, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1237 = function(v_952, k_1242) {
var k_1238 = function(v_952, v_id) {
var v_953 = v_id;
var v_954 = scheme["Syntax"](
new scheme["Symbol"]("threads:call-with-new-thread"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-70"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-65"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1242(v_954);
};
if (arguments["length"] == 3) {
{
return k_1238(v_952, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1243 = function(v_955, k_1257) {
var k_1244 = function(v_955, v_id, v_arg) {
var v_956 = v_id;
var v_957 = v_arg;
var v_958 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-68"), new scheme["String"]("l-1e3d92e2925abd71-69"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-65"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_959 = scheme["EMPTY"];
var v_960 = scheme["primitives"]["cons"](v_956, v_959);
var v_961 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-68"), new scheme["String"]("l-1e3d92e2925abd71-69"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-62"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-65"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_962 = scheme["primitives"]["cons"](v_961, v_960);
var v_963 = scheme["primitives"]["cons"](v_962, v_959);
var v_964 = scheme["primitives"]["cons"](v_961, v_957);
var v_965 = scheme["primitives"]["cons"](v_964, v_959);
var v_966 = scheme["primitives"]["cons"](v_963, v_965);
var v_967 = scheme["primitives"]["cons"](v_958, v_966);
scheme["primitives"]["handle-interrupts"]();
return k_1257(v_967);
};
if (arguments["length"] == 4) {
{
return k_1244(v_955, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1258 = function(v_968, k_1270) {
var k_1259 = function(v_968) {
var v_969 = scheme["list"](new scheme["Symbol"]("guile"));
var v_970 = new scheme["Symbol"]("module-export!");
var v_971 = scheme["FALSE"];
var v_972 = scheme["TRUE"];
var v_973 = scheme["primitives"]["cached-module-box"](v_969, v_970, v_971, v_972);
var v_974 = scheme["primitives"]["box-ref"](v_973);
var v_975 = scheme["primitives"]["current-module"]();
var v_976 = scheme["list"](new scheme["Symbol"]("call-with-new-thread"));
scheme["primitives"]["handle-interrupts"]();
return v_974["fun"](v_974, k_1270, v_975, v_976);
};
if (arguments["length"] == 2) {
{
return k_1259(v_968);
}
} else {
{
return undefined;
}
}
};
var k_1271 = function(v_977, k_1322) {
var k_1272 = function(v_977, v_x) {
var v_978 = v_x;
var v_979 = new scheme["Symbol"]("issue-deprecation-warning");
var v_980 = scheme["TRUE"];
var v_981 = 47;
var v_982 = scheme["primitives"]["cached-toplevel-box"](v_981, v_979, v_980);
var v_983 = scheme["primitives"]["box-ref"](v_982);
var v_984 = new scheme["String"]("Import (ice-9 threads) to have access to `yield'.");
scheme["primitives"]["handle-interrupts"]();
var k_1281 = function(v_vals) {
var v_985 = v_vals;
var v_986 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_987 = scheme["list"](new scheme["Symbol"]("guile"));
var v_988 = new scheme["Symbol"]("$sc-dispatch");
var v_989 = scheme["FALSE"];
var v_990 = scheme["TRUE"];
var v_991 = scheme["primitives"]["cached-module-box"](v_987, v_988, v_989, v_990);
var v_992 = scheme["primitives"]["box-ref"](v_991);
scheme["primitives"]["handle-interrupts"]();
var k_1291 = function(v_tmp, v_rest) {
var v_993 = v_tmp;
var v_994 = v_rest;
if (scheme["is_true"](v_993)) {
{
var v_1013 = new scheme["Closure"](k_1339, 0);
var v_1014 = 0;
var v_1015 = scheme["primitives"]["builtin-ref"](v_1014);
scheme["primitives"]["handle-interrupts"]();
return v_1015["fun"](v_1015, k_1322, v_1013, v_993);
}
} else {
{
var v_995 = scheme["EMPTY"];
var v_996 = scheme["primitives"]["cons"](v_978, v_995);
var v_997 = new scheme["Closure"](k_1323, 0);
var v_998 = 0;
var v_999 = scheme["primitives"]["builtin-ref"](v_998);
scheme["primitives"]["handle-interrupts"]();
var k_1300 = function(v_arg, v_rest) {
var v_1000 = v_arg;
var v_1001 = v_rest;
if (scheme["is_true"](v_1000)) {
{
var v_1010 = new scheme["Closure"](k_1333, 0);
var v_1011 = 0;
var v_1012 = scheme["primitives"]["builtin-ref"](v_1011);
scheme["primitives"]["handle-interrupts"]();
return v_1012["fun"](v_1012, k_1322, v_1010, v_996);
}
} else {
{
var v_1002 = scheme["FALSE"];
var v_1003 = new scheme["String"]("source expression failed to match any pattern");
var v_1004 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1005 = new scheme["Symbol"]("syntax-violation");
var v_1006 = scheme["FALSE"];
var v_1007 = scheme["TRUE"];
var v_1008 = scheme["primitives"]["cached-module-box"](v_1004, v_1005, v_1006, v_1007);
var v_1009 = scheme["primitives"]["box-ref"](v_1008);
scheme["primitives"]["handle-interrupts"]();
return v_1009["fun"](v_1009, k_1322, v_1002, v_1003, v_978);
}
}
};
return v_999["fun"](v_999, k_1300, v_997, v_996);
}
}
};
return v_992["fun"](v_992, k_1291, v_978, v_986);
};
return v_983["fun"](v_983, k_1281, v_984);
};
if (arguments["length"] == 3) {
{
return k_1272(v_977, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1323 = function(v_1016, k_1332) {
var k_1324 = function(v_1016, v_id) {
var v_1017 = v_id;
var v_1018 = new scheme["Symbol"]("identifier?");
var v_1019 = scheme["TRUE"];
var v_1020 = 47;
var v_1021 = scheme["primitives"]["cached-toplevel-box"](v_1020, v_1018, v_1019);
var v_1022 = scheme["primitives"]["box-ref"](v_1021);
scheme["primitives"]["handle-interrupts"]();
return v_1022["fun"](v_1022, k_1332, v_1017);
};
if (arguments["length"] == 3) {
{
return k_1324(v_1016, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1333 = function(v_1023, k_1338) {
var k_1334 = function(v_1023, v_id) {
var v_1024 = v_id;
var v_1025 = scheme["Syntax"](
new scheme["Symbol"]("threads:yield"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-82"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-77"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1338(v_1025);
};
if (arguments["length"] == 3) {
{
return k_1334(v_1023, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1339 = function(v_1026, k_1353) {
var k_1340 = function(v_1026, v_id, v_arg) {
var v_1027 = v_id;
var v_1028 = v_arg;
var v_1029 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7a"), new scheme["String"]("l-1e3d92e2925abd71-7b"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-77"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1030 = scheme["EMPTY"];
var v_1031 = scheme["primitives"]["cons"](v_1027, v_1030);
var v_1032 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7a"), new scheme["String"]("l-1e3d92e2925abd71-7b"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-74"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-77"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1033 = scheme["primitives"]["cons"](v_1032, v_1031);
var v_1034 = scheme["primitives"]["cons"](v_1033, v_1030);
var v_1035 = scheme["primitives"]["cons"](v_1032, v_1028);
var v_1036 = scheme["primitives"]["cons"](v_1035, v_1030);
var v_1037 = scheme["primitives"]["cons"](v_1034, v_1036);
var v_1038 = scheme["primitives"]["cons"](v_1029, v_1037);
scheme["primitives"]["handle-interrupts"]();
return k_1353(v_1038);
};
if (arguments["length"] == 4) {
{
return k_1340(v_1026, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1354 = function(v_1039, k_1366) {
var k_1355 = function(v_1039) {
var v_1040 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1041 = new scheme["Symbol"]("module-export!");
var v_1042 = scheme["FALSE"];
var v_1043 = scheme["TRUE"];
var v_1044 = scheme["primitives"]["cached-module-box"](v_1040, v_1041, v_1042, v_1043);
var v_1045 = scheme["primitives"]["box-ref"](v_1044);
var v_1046 = scheme["primitives"]["current-module"]();
var v_1047 = scheme["list"](new scheme["Symbol"]("yield"));
scheme["primitives"]["handle-interrupts"]();
return v_1045["fun"](v_1045, k_1366, v_1046, v_1047);
};
if (arguments["length"] == 2) {
{
return k_1355(v_1039);
}
} else {
{
return undefined;
}
}
};
var k_1367 = function(v_1048, k_1418) {
var k_1368 = function(v_1048, v_x) {
var v_1049 = v_x;
var v_1050 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1051 = scheme["TRUE"];
var v_1052 = 45;
var v_1053 = scheme["primitives"]["cached-toplevel-box"](v_1052, v_1050, v_1051);
var v_1054 = scheme["primitives"]["box-ref"](v_1053);
var v_1055 = new scheme["String"]("Import (ice-9 threads) to have access to `cancel-thread'.");
scheme["primitives"]["handle-interrupts"]();
var k_1377 = function(v_vals) {
var v_1056 = v_vals;
var v_1057 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1058 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1059 = new scheme["Symbol"]("$sc-dispatch");
var v_1060 = scheme["FALSE"];
var v_1061 = scheme["TRUE"];
var v_1062 = scheme["primitives"]["cached-module-box"](v_1058, v_1059, v_1060, v_1061);
var v_1063 = scheme["primitives"]["box-ref"](v_1062);
scheme["primitives"]["handle-interrupts"]();
var k_1387 = function(v_tmp, v_rest) {
var v_1064 = v_tmp;
var v_1065 = v_rest;
if (scheme["is_true"](v_1064)) {
{
var v_1084 = new scheme["Closure"](k_1435, 0);
var v_1085 = 0;
var v_1086 = scheme["primitives"]["builtin-ref"](v_1085);
scheme["primitives"]["handle-interrupts"]();
return v_1086["fun"](v_1086, k_1418, v_1084, v_1064);
}
} else {
{
var v_1066 = scheme["EMPTY"];
var v_1067 = scheme["primitives"]["cons"](v_1049, v_1066);
var v_1068 = new scheme["Closure"](k_1419, 0);
var v_1069 = 0;
var v_1070 = scheme["primitives"]["builtin-ref"](v_1069);
scheme["primitives"]["handle-interrupts"]();
var k_1396 = function(v_arg, v_rest) {
var v_1071 = v_arg;
var v_1072 = v_rest;
if (scheme["is_true"](v_1071)) {
{
var v_1081 = new scheme["Closure"](k_1429, 0);
var v_1082 = 0;
var v_1083 = scheme["primitives"]["builtin-ref"](v_1082);
scheme["primitives"]["handle-interrupts"]();
return v_1083["fun"](v_1083, k_1418, v_1081, v_1067);
}
} else {
{
var v_1073 = scheme["FALSE"];
var v_1074 = new scheme["String"]("source expression failed to match any pattern");
var v_1075 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1076 = new scheme["Symbol"]("syntax-violation");
var v_1077 = scheme["FALSE"];
var v_1078 = scheme["TRUE"];
var v_1079 = scheme["primitives"]["cached-module-box"](v_1075, v_1076, v_1077, v_1078);
var v_1080 = scheme["primitives"]["box-ref"](v_1079);
scheme["primitives"]["handle-interrupts"]();
return v_1080["fun"](v_1080, k_1418, v_1073, v_1074, v_1049);
}
}
};
return v_1070["fun"](v_1070, k_1396, v_1068, v_1067);
}
}
};
return v_1063["fun"](v_1063, k_1387, v_1049, v_1057);
};
return v_1054["fun"](v_1054, k_1377, v_1055);
};
if (arguments["length"] == 3) {
{
return k_1368(v_1048, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1419 = function(v_1087, k_1428) {
var k_1420 = function(v_1087, v_id) {
var v_1088 = v_id;
var v_1089 = new scheme["Symbol"]("identifier?");
var v_1090 = scheme["TRUE"];
var v_1091 = 45;
var v_1092 = scheme["primitives"]["cached-toplevel-box"](v_1091, v_1089, v_1090);
var v_1093 = scheme["primitives"]["box-ref"](v_1092);
scheme["primitives"]["handle-interrupts"]();
return v_1093["fun"](v_1093, k_1428, v_1088);
};
if (arguments["length"] == 3) {
{
return k_1420(v_1087, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1429 = function(v_1094, k_1434) {
var k_1430 = function(v_1094, v_id) {
var v_1095 = v_id;
var v_1096 = scheme["Syntax"](
new scheme["Symbol"]("threads:cancel-thread"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-94"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-89"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1434(v_1096);
};
if (arguments["length"] == 3) {
{
return k_1430(v_1094, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1435 = function(v_1097, k_1449) {
var k_1436 = function(v_1097, v_id, v_arg) {
var v_1098 = v_id;
var v_1099 = v_arg;
var v_1100 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-8c"), new scheme["String"]("l-1e3d92e2925abd71-8d"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-89"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1101 = scheme["EMPTY"];
var v_1102 = scheme["primitives"]["cons"](v_1098, v_1101);
var v_1103 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-8c"), new scheme["String"]("l-1e3d92e2925abd71-8d"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-86"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-89"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1104 = scheme["primitives"]["cons"](v_1103, v_1102);
var v_1105 = scheme["primitives"]["cons"](v_1104, v_1101);
var v_1106 = scheme["primitives"]["cons"](v_1103, v_1099);
var v_1107 = scheme["primitives"]["cons"](v_1106, v_1101);
var v_1108 = scheme["primitives"]["cons"](v_1105, v_1107);
var v_1109 = scheme["primitives"]["cons"](v_1100, v_1108);
scheme["primitives"]["handle-interrupts"]();
return k_1449(v_1109);
};
if (arguments["length"] == 4) {
{
return k_1436(v_1097, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1450 = function(v_1110, k_1462) {
var k_1451 = function(v_1110) {
var v_1111 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1112 = new scheme["Symbol"]("module-export!");
var v_1113 = scheme["FALSE"];
var v_1114 = scheme["TRUE"];
var v_1115 = scheme["primitives"]["cached-module-box"](v_1111, v_1112, v_1113, v_1114);
var v_1116 = scheme["primitives"]["box-ref"](v_1115);
var v_1117 = scheme["primitives"]["current-module"]();
var v_1118 = scheme["list"](new scheme["Symbol"]("cancel-thread"));
scheme["primitives"]["handle-interrupts"]();
return v_1116["fun"](v_1116, k_1462, v_1117, v_1118);
};
if (arguments["length"] == 2) {
{
return k_1451(v_1110);
}
} else {
{
return undefined;
}
}
};
var k_1463 = function(v_1119, k_1514) {
var k_1464 = function(v_1119, v_x) {
var v_1120 = v_x;
var v_1121 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1122 = scheme["TRUE"];
var v_1123 = 43;
var v_1124 = scheme["primitives"]["cached-toplevel-box"](v_1123, v_1121, v_1122);
var v_1125 = scheme["primitives"]["box-ref"](v_1124);
var v_1126 = new scheme["String"]("Import (ice-9 threads) to have access to `join-thread'.");
scheme["primitives"]["handle-interrupts"]();
var k_1473 = function(v_vals) {
var v_1127 = v_vals;
var v_1128 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1129 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1130 = new scheme["Symbol"]("$sc-dispatch");
var v_1131 = scheme["FALSE"];
var v_1132 = scheme["TRUE"];
var v_1133 = scheme["primitives"]["cached-module-box"](v_1129, v_1130, v_1131, v_1132);
var v_1134 = scheme["primitives"]["box-ref"](v_1133);
scheme["primitives"]["handle-interrupts"]();
var k_1483 = function(v_tmp, v_rest) {
var v_1135 = v_tmp;
var v_1136 = v_rest;
if (scheme["is_true"](v_1135)) {
{
var v_1155 = new scheme["Closure"](k_1531, 0);
var v_1156 = 0;
var v_1157 = scheme["primitives"]["builtin-ref"](v_1156);
scheme["primitives"]["handle-interrupts"]();
return v_1157["fun"](v_1157, k_1514, v_1155, v_1135);
}
} else {
{
var v_1137 = scheme["EMPTY"];
var v_1138 = scheme["primitives"]["cons"](v_1120, v_1137);
var v_1139 = new scheme["Closure"](k_1515, 0);
var v_1140 = 0;
var v_1141 = scheme["primitives"]["builtin-ref"](v_1140);
scheme["primitives"]["handle-interrupts"]();
var k_1492 = function(v_arg, v_rest) {
var v_1142 = v_arg;
var v_1143 = v_rest;
if (scheme["is_true"](v_1142)) {
{
var v_1152 = new scheme["Closure"](k_1525, 0);
var v_1153 = 0;
var v_1154 = scheme["primitives"]["builtin-ref"](v_1153);
scheme["primitives"]["handle-interrupts"]();
return v_1154["fun"](v_1154, k_1514, v_1152, v_1138);
}
} else {
{
var v_1144 = scheme["FALSE"];
var v_1145 = new scheme["String"]("source expression failed to match any pattern");
var v_1146 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1147 = new scheme["Symbol"]("syntax-violation");
var v_1148 = scheme["FALSE"];
var v_1149 = scheme["TRUE"];
var v_1150 = scheme["primitives"]["cached-module-box"](v_1146, v_1147, v_1148, v_1149);
var v_1151 = scheme["primitives"]["box-ref"](v_1150);
scheme["primitives"]["handle-interrupts"]();
return v_1151["fun"](v_1151, k_1514, v_1144, v_1145, v_1120);
}
}
};
return v_1141["fun"](v_1141, k_1492, v_1139, v_1138);
}
}
};
return v_1134["fun"](v_1134, k_1483, v_1120, v_1128);
};
return v_1125["fun"](v_1125, k_1473, v_1126);
};
if (arguments["length"] == 3) {
{
return k_1464(v_1119, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1515 = function(v_1158, k_1524) {
var k_1516 = function(v_1158, v_id) {
var v_1159 = v_id;
var v_1160 = new scheme["Symbol"]("identifier?");
var v_1161 = scheme["TRUE"];
var v_1162 = 43;
var v_1163 = scheme["primitives"]["cached-toplevel-box"](v_1162, v_1160, v_1161);
var v_1164 = scheme["primitives"]["box-ref"](v_1163);
scheme["primitives"]["handle-interrupts"]();
return v_1164["fun"](v_1164, k_1524, v_1159);
};
if (arguments["length"] == 3) {
{
return k_1516(v_1158, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1525 = function(v_1165, k_1530) {
var k_1526 = function(v_1165, v_id) {
var v_1166 = v_id;
var v_1167 = scheme["Syntax"](
new scheme["Symbol"]("threads:join-thread"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-a6"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-9b"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1530(v_1167);
};
if (arguments["length"] == 3) {
{
return k_1526(v_1165, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1531 = function(v_1168, k_1545) {
var k_1532 = function(v_1168, v_id, v_arg) {
var v_1169 = v_id;
var v_1170 = v_arg;
var v_1171 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-9e"), new scheme["String"]("l-1e3d92e2925abd71-9f"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-9b"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1172 = scheme["EMPTY"];
var v_1173 = scheme["primitives"]["cons"](v_1169, v_1172);
var v_1174 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-9e"), new scheme["String"]("l-1e3d92e2925abd71-9f"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-98"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-9b"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1175 = scheme["primitives"]["cons"](v_1174, v_1173);
var v_1176 = scheme["primitives"]["cons"](v_1175, v_1172);
var v_1177 = scheme["primitives"]["cons"](v_1174, v_1170);
var v_1178 = scheme["primitives"]["cons"](v_1177, v_1172);
var v_1179 = scheme["primitives"]["cons"](v_1176, v_1178);
var v_1180 = scheme["primitives"]["cons"](v_1171, v_1179);
scheme["primitives"]["handle-interrupts"]();
return k_1545(v_1180);
};
if (arguments["length"] == 4) {
{
return k_1532(v_1168, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1546 = function(v_1181, k_1558) {
var k_1547 = function(v_1181) {
var v_1182 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1183 = new scheme["Symbol"]("module-export!");
var v_1184 = scheme["FALSE"];
var v_1185 = scheme["TRUE"];
var v_1186 = scheme["primitives"]["cached-module-box"](v_1182, v_1183, v_1184, v_1185);
var v_1187 = scheme["primitives"]["box-ref"](v_1186);
var v_1188 = scheme["primitives"]["current-module"]();
var v_1189 = scheme["list"](new scheme["Symbol"]("join-thread"));
scheme["primitives"]["handle-interrupts"]();
return v_1187["fun"](v_1187, k_1558, v_1188, v_1189);
};
if (arguments["length"] == 2) {
{
return k_1547(v_1181);
}
} else {
{
return undefined;
}
}
};
var k_1559 = function(v_1190, k_1610) {
var k_1560 = function(v_1190, v_x) {
var v_1191 = v_x;
var v_1192 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1193 = scheme["TRUE"];
var v_1194 = 41;
var v_1195 = scheme["primitives"]["cached-toplevel-box"](v_1194, v_1192, v_1193);
var v_1196 = scheme["primitives"]["box-ref"](v_1195);
var v_1197 = new scheme["String"]("Import (ice-9 threads) to have access to `thread?'.");
scheme["primitives"]["handle-interrupts"]();
var k_1569 = function(v_vals) {
var v_1198 = v_vals;
var v_1199 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1200 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1201 = new scheme["Symbol"]("$sc-dispatch");
var v_1202 = scheme["FALSE"];
var v_1203 = scheme["TRUE"];
var v_1204 = scheme["primitives"]["cached-module-box"](v_1200, v_1201, v_1202, v_1203);
var v_1205 = scheme["primitives"]["box-ref"](v_1204);
scheme["primitives"]["handle-interrupts"]();
var k_1579 = function(v_tmp, v_rest) {
var v_1206 = v_tmp;
var v_1207 = v_rest;
if (scheme["is_true"](v_1206)) {
{
var v_1226 = new scheme["Closure"](k_1627, 0);
var v_1227 = 0;
var v_1228 = scheme["primitives"]["builtin-ref"](v_1227);
scheme["primitives"]["handle-interrupts"]();
return v_1228["fun"](v_1228, k_1610, v_1226, v_1206);
}
} else {
{
var v_1208 = scheme["EMPTY"];
var v_1209 = scheme["primitives"]["cons"](v_1191, v_1208);
var v_1210 = new scheme["Closure"](k_1611, 0);
var v_1211 = 0;
var v_1212 = scheme["primitives"]["builtin-ref"](v_1211);
scheme["primitives"]["handle-interrupts"]();
var k_1588 = function(v_arg, v_rest) {
var v_1213 = v_arg;
var v_1214 = v_rest;
if (scheme["is_true"](v_1213)) {
{
var v_1223 = new scheme["Closure"](k_1621, 0);
var v_1224 = 0;
var v_1225 = scheme["primitives"]["builtin-ref"](v_1224);
scheme["primitives"]["handle-interrupts"]();
return v_1225["fun"](v_1225, k_1610, v_1223, v_1209);
}
} else {
{
var v_1215 = scheme["FALSE"];
var v_1216 = new scheme["String"]("source expression failed to match any pattern");
var v_1217 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1218 = new scheme["Symbol"]("syntax-violation");
var v_1219 = scheme["FALSE"];
var v_1220 = scheme["TRUE"];
var v_1221 = scheme["primitives"]["cached-module-box"](v_1217, v_1218, v_1219, v_1220);
var v_1222 = scheme["primitives"]["box-ref"](v_1221);
scheme["primitives"]["handle-interrupts"]();
return v_1222["fun"](v_1222, k_1610, v_1215, v_1216, v_1191);
}
}
};
return v_1212["fun"](v_1212, k_1588, v_1210, v_1209);
}
}
};
return v_1205["fun"](v_1205, k_1579, v_1191, v_1199);
};
return v_1196["fun"](v_1196, k_1569, v_1197);
};
if (arguments["length"] == 3) {
{
return k_1560(v_1190, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1611 = function(v_1229, k_1620) {
var k_1612 = function(v_1229, v_id) {
var v_1230 = v_id;
var v_1231 = new scheme["Symbol"]("identifier?");
var v_1232 = scheme["TRUE"];
var v_1233 = 41;
var v_1234 = scheme["primitives"]["cached-toplevel-box"](v_1233, v_1231, v_1232);
var v_1235 = scheme["primitives"]["box-ref"](v_1234);
scheme["primitives"]["handle-interrupts"]();
return v_1235["fun"](v_1235, k_1620, v_1230);
};
if (arguments["length"] == 3) {
{
return k_1612(v_1229, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1621 = function(v_1236, k_1626) {
var k_1622 = function(v_1236, v_id) {
var v_1237 = v_id;
var v_1238 = scheme["Syntax"](
new scheme["Symbol"]("threads:thread?"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-b8"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-ad"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1626(v_1238);
};
if (arguments["length"] == 3) {
{
return k_1622(v_1236, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1627 = function(v_1239, k_1641) {
var k_1628 = function(v_1239, v_id, v_arg) {
var v_1240 = v_id;
var v_1241 = v_arg;
var v_1242 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-b0"), new scheme["String"]("l-1e3d92e2925abd71-b1"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-ad"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1243 = scheme["EMPTY"];
var v_1244 = scheme["primitives"]["cons"](v_1240, v_1243);
var v_1245 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-b0"), new scheme["String"]("l-1e3d92e2925abd71-b1"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-aa"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-ad"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1246 = scheme["primitives"]["cons"](v_1245, v_1244);
var v_1247 = scheme["primitives"]["cons"](v_1246, v_1243);
var v_1248 = scheme["primitives"]["cons"](v_1245, v_1241);
var v_1249 = scheme["primitives"]["cons"](v_1248, v_1243);
var v_1250 = scheme["primitives"]["cons"](v_1247, v_1249);
var v_1251 = scheme["primitives"]["cons"](v_1242, v_1250);
scheme["primitives"]["handle-interrupts"]();
return k_1641(v_1251);
};
if (arguments["length"] == 4) {
{
return k_1628(v_1239, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1642 = function(v_1252, k_1654) {
var k_1643 = function(v_1252) {
var v_1253 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1254 = new scheme["Symbol"]("module-export!");
var v_1255 = scheme["FALSE"];
var v_1256 = scheme["TRUE"];
var v_1257 = scheme["primitives"]["cached-module-box"](v_1253, v_1254, v_1255, v_1256);
var v_1258 = scheme["primitives"]["box-ref"](v_1257);
var v_1259 = scheme["primitives"]["current-module"]();
var v_1260 = scheme["list"](new scheme["Symbol"]("thread?"));
scheme["primitives"]["handle-interrupts"]();
return v_1258["fun"](v_1258, k_1654, v_1259, v_1260);
};
if (arguments["length"] == 2) {
{
return k_1643(v_1252);
}
} else {
{
return undefined;
}
}
};
var k_1655 = function(v_1261, k_1706) {
var k_1656 = function(v_1261, v_x) {
var v_1262 = v_x;
var v_1263 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1264 = scheme["TRUE"];
var v_1265 = 39;
var v_1266 = scheme["primitives"]["cached-toplevel-box"](v_1265, v_1263, v_1264);
var v_1267 = scheme["primitives"]["box-ref"](v_1266);
var v_1268 = new scheme["String"]("Import (ice-9 threads) to have access to `make-mutex'.");
scheme["primitives"]["handle-interrupts"]();
var k_1665 = function(v_vals) {
var v_1269 = v_vals;
var v_1270 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1271 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1272 = new scheme["Symbol"]("$sc-dispatch");
var v_1273 = scheme["FALSE"];
var v_1274 = scheme["TRUE"];
var v_1275 = scheme["primitives"]["cached-module-box"](v_1271, v_1272, v_1273, v_1274);
var v_1276 = scheme["primitives"]["box-ref"](v_1275);
scheme["primitives"]["handle-interrupts"]();
var k_1675 = function(v_tmp, v_rest) {
var v_1277 = v_tmp;
var v_1278 = v_rest;
if (scheme["is_true"](v_1277)) {
{
var v_1297 = new scheme["Closure"](k_1723, 0);
var v_1298 = 0;
var v_1299 = scheme["primitives"]["builtin-ref"](v_1298);
scheme["primitives"]["handle-interrupts"]();
return v_1299["fun"](v_1299, k_1706, v_1297, v_1277);
}
} else {
{
var v_1279 = scheme["EMPTY"];
var v_1280 = scheme["primitives"]["cons"](v_1262, v_1279);
var v_1281 = new scheme["Closure"](k_1707, 0);
var v_1282 = 0;
var v_1283 = scheme["primitives"]["builtin-ref"](v_1282);
scheme["primitives"]["handle-interrupts"]();
var k_1684 = function(v_arg, v_rest) {
var v_1284 = v_arg;
var v_1285 = v_rest;
if (scheme["is_true"](v_1284)) {
{
var v_1294 = new scheme["Closure"](k_1717, 0);
var v_1295 = 0;
var v_1296 = scheme["primitives"]["builtin-ref"](v_1295);
scheme["primitives"]["handle-interrupts"]();
return v_1296["fun"](v_1296, k_1706, v_1294, v_1280);
}
} else {
{
var v_1286 = scheme["FALSE"];
var v_1287 = new scheme["String"]("source expression failed to match any pattern");
var v_1288 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1289 = new scheme["Symbol"]("syntax-violation");
var v_1290 = scheme["FALSE"];
var v_1291 = scheme["TRUE"];
var v_1292 = scheme["primitives"]["cached-module-box"](v_1288, v_1289, v_1290, v_1291);
var v_1293 = scheme["primitives"]["box-ref"](v_1292);
scheme["primitives"]["handle-interrupts"]();
return v_1293["fun"](v_1293, k_1706, v_1286, v_1287, v_1262);
}
}
};
return v_1283["fun"](v_1283, k_1684, v_1281, v_1280);
}
}
};
return v_1276["fun"](v_1276, k_1675, v_1262, v_1270);
};
return v_1267["fun"](v_1267, k_1665, v_1268);
};
if (arguments["length"] == 3) {
{
return k_1656(v_1261, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1707 = function(v_1300, k_1716) {
var k_1708 = function(v_1300, v_id) {
var v_1301 = v_id;
var v_1302 = new scheme["Symbol"]("identifier?");
var v_1303 = scheme["TRUE"];
var v_1304 = 39;
var v_1305 = scheme["primitives"]["cached-toplevel-box"](v_1304, v_1302, v_1303);
var v_1306 = scheme["primitives"]["box-ref"](v_1305);
scheme["primitives"]["handle-interrupts"]();
return v_1306["fun"](v_1306, k_1716, v_1301);
};
if (arguments["length"] == 3) {
{
return k_1708(v_1300, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1717 = function(v_1307, k_1722) {
var k_1718 = function(v_1307, v_id) {
var v_1308 = v_id;
var v_1309 = scheme["Syntax"](
new scheme["Symbol"]("threads:make-mutex"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-ca"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-bf"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1722(v_1309);
};
if (arguments["length"] == 3) {
{
return k_1718(v_1307, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1723 = function(v_1310, k_1737) {
var k_1724 = function(v_1310, v_id, v_arg) {
var v_1311 = v_id;
var v_1312 = v_arg;
var v_1313 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-c2"), new scheme["String"]("l-1e3d92e2925abd71-c3"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-bf"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1314 = scheme["EMPTY"];
var v_1315 = scheme["primitives"]["cons"](v_1311, v_1314);
var v_1316 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-c2"), new scheme["String"]("l-1e3d92e2925abd71-c3"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-bc"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-bf"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1317 = scheme["primitives"]["cons"](v_1316, v_1315);
var v_1318 = scheme["primitives"]["cons"](v_1317, v_1314);
var v_1319 = scheme["primitives"]["cons"](v_1316, v_1312);
var v_1320 = scheme["primitives"]["cons"](v_1319, v_1314);
var v_1321 = scheme["primitives"]["cons"](v_1318, v_1320);
var v_1322 = scheme["primitives"]["cons"](v_1313, v_1321);
scheme["primitives"]["handle-interrupts"]();
return k_1737(v_1322);
};
if (arguments["length"] == 4) {
{
return k_1724(v_1310, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1738 = function(v_1323, k_1750) {
var k_1739 = function(v_1323) {
var v_1324 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1325 = new scheme["Symbol"]("module-export!");
var v_1326 = scheme["FALSE"];
var v_1327 = scheme["TRUE"];
var v_1328 = scheme["primitives"]["cached-module-box"](v_1324, v_1325, v_1326, v_1327);
var v_1329 = scheme["primitives"]["box-ref"](v_1328);
var v_1330 = scheme["primitives"]["current-module"]();
var v_1331 = scheme["list"](new scheme["Symbol"]("make-mutex"));
scheme["primitives"]["handle-interrupts"]();
return v_1329["fun"](v_1329, k_1750, v_1330, v_1331);
};
if (arguments["length"] == 2) {
{
return k_1739(v_1323);
}
} else {
{
return undefined;
}
}
};
var k_1751 = function(v_1332, k_1802) {
var k_1752 = function(v_1332, v_x) {
var v_1333 = v_x;
var v_1334 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1335 = scheme["TRUE"];
var v_1336 = 37;
var v_1337 = scheme["primitives"]["cached-toplevel-box"](v_1336, v_1334, v_1335);
var v_1338 = scheme["primitives"]["box-ref"](v_1337);
var v_1339 = new scheme["String"]("Import (ice-9 threads) to have access to `make-recursive-mutex'.");
scheme["primitives"]["handle-interrupts"]();
var k_1761 = function(v_vals) {
var v_1340 = v_vals;
var v_1341 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1342 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1343 = new scheme["Symbol"]("$sc-dispatch");
var v_1344 = scheme["FALSE"];
var v_1345 = scheme["TRUE"];
var v_1346 = scheme["primitives"]["cached-module-box"](v_1342, v_1343, v_1344, v_1345);
var v_1347 = scheme["primitives"]["box-ref"](v_1346);
scheme["primitives"]["handle-interrupts"]();
var k_1771 = function(v_tmp, v_rest) {
var v_1348 = v_tmp;
var v_1349 = v_rest;
if (scheme["is_true"](v_1348)) {
{
var v_1368 = new scheme["Closure"](k_1819, 0);
var v_1369 = 0;
var v_1370 = scheme["primitives"]["builtin-ref"](v_1369);
scheme["primitives"]["handle-interrupts"]();
return v_1370["fun"](v_1370, k_1802, v_1368, v_1348);
}
} else {
{
var v_1350 = scheme["EMPTY"];
var v_1351 = scheme["primitives"]["cons"](v_1333, v_1350);
var v_1352 = new scheme["Closure"](k_1803, 0);
var v_1353 = 0;
var v_1354 = scheme["primitives"]["builtin-ref"](v_1353);
scheme["primitives"]["handle-interrupts"]();
var k_1780 = function(v_arg, v_rest) {
var v_1355 = v_arg;
var v_1356 = v_rest;
if (scheme["is_true"](v_1355)) {
{
var v_1365 = new scheme["Closure"](k_1813, 0);
var v_1366 = 0;
var v_1367 = scheme["primitives"]["builtin-ref"](v_1366);
scheme["primitives"]["handle-interrupts"]();
return v_1367["fun"](v_1367, k_1802, v_1365, v_1351);
}
} else {
{
var v_1357 = scheme["FALSE"];
var v_1358 = new scheme["String"]("source expression failed to match any pattern");
var v_1359 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1360 = new scheme["Symbol"]("syntax-violation");
var v_1361 = scheme["FALSE"];
var v_1362 = scheme["TRUE"];
var v_1363 = scheme["primitives"]["cached-module-box"](v_1359, v_1360, v_1361, v_1362);
var v_1364 = scheme["primitives"]["box-ref"](v_1363);
scheme["primitives"]["handle-interrupts"]();
return v_1364["fun"](v_1364, k_1802, v_1357, v_1358, v_1333);
}
}
};
return v_1354["fun"](v_1354, k_1780, v_1352, v_1351);
}
}
};
return v_1347["fun"](v_1347, k_1771, v_1333, v_1341);
};
return v_1338["fun"](v_1338, k_1761, v_1339);
};
if (arguments["length"] == 3) {
{
return k_1752(v_1332, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1803 = function(v_1371, k_1812) {
var k_1804 = function(v_1371, v_id) {
var v_1372 = v_id;
var v_1373 = new scheme["Symbol"]("identifier?");
var v_1374 = scheme["TRUE"];
var v_1375 = 37;
var v_1376 = scheme["primitives"]["cached-toplevel-box"](v_1375, v_1373, v_1374);
var v_1377 = scheme["primitives"]["box-ref"](v_1376);
scheme["primitives"]["handle-interrupts"]();
return v_1377["fun"](v_1377, k_1812, v_1372);
};
if (arguments["length"] == 3) {
{
return k_1804(v_1371, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1813 = function(v_1378, k_1818) {
var k_1814 = function(v_1378, v_id) {
var v_1379 = v_id;
var v_1380 = scheme["Syntax"](
new scheme["Symbol"]("threads:make-recursive-mutex"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-dc"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-d1"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
)
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
scheme["primitives"]["handle-interrupts"]();
return k_1818(v_1380);
};
if (arguments["length"] == 3) {
{
return k_1814(v_1378, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1819 = function(v_1381, k_1833) {
var k_1820 = function(v_1381, v_id, v_arg) {
var v_1382 = v_id;
var v_1383 = v_arg;
var v_1384 = scheme["Syntax"](
new scheme["Symbol"]("let"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-d4"), new scheme["String"]("l-1e3d92e2925abd71-d5"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-d1"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1385 = scheme["EMPTY"];
var v_1386 = scheme["primitives"]["cons"](v_1382, v_1385);
var v_1387 = scheme["Syntax"](
new scheme["Symbol"]("x"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id"), new scheme["Symbol"]("arg")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-d4"), new scheme["String"]("l-1e3d92e2925abd71-d5"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-ce"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-d1"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Symbol"]("shift"),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("dummy"), new scheme["Symbol"]("var"), new scheme["Symbol"]("msg"), new scheme["Symbol"]("exp")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top")), scheme["list"](new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-7"), new scheme["String"]("l-1e3d92e2925abd71-8"), new scheme["String"]("l-1e3d92e2925abd71-9"), new scheme["String"]("l-1e3d92e2925abd71-a"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-2"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-4"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["list"](new scheme["Symbol"]("define-deprecated")), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("define-deprecated"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))))
),
scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))
);
var v_1388 = scheme["primitives"]["cons"](v_1387, v_1386);
var v_1389 = scheme["primitives"]["cons"](v_1388, v_1385);
var v_1390 = scheme["primitives"]["cons"](v_1387, v_1383);
var v_1391 = scheme["primitives"]["cons"](v_1390, v_1385);
var v_1392 = scheme["primitives"]["cons"](v_1389, v_1391);
var v_1393 = scheme["primitives"]["cons"](v_1384, v_1392);
scheme["primitives"]["handle-interrupts"]();
return k_1833(v_1393);
};
if (arguments["length"] == 4) {
{
return k_1820(v_1381, arguments[2], arguments[3]);
}
} else {
{
return undefined;
}
}
};
var k_1834 = function(v_1394, k_1846) {
var k_1835 = function(v_1394) {
var v_1395 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1396 = new scheme["Symbol"]("module-export!");
var v_1397 = scheme["FALSE"];
var v_1398 = scheme["TRUE"];
var v_1399 = scheme["primitives"]["cached-module-box"](v_1395, v_1396, v_1397, v_1398);
var v_1400 = scheme["primitives"]["box-ref"](v_1399);
var v_1401 = scheme["primitives"]["current-module"]();
var v_1402 = scheme["list"](new scheme["Symbol"]("make-recursive-mutex"));
scheme["primitives"]["handle-interrupts"]();
return v_1400["fun"](v_1400, k_1846, v_1401, v_1402);
};
if (arguments["length"] == 2) {
{
return k_1835(v_1394);
}
} else {
{
return undefined;
}
}
};
var k_1847 = function(v_1403, k_1898) {
var k_1848 = function(v_1403, v_x) {
var v_1404 = v_x;
var v_1405 = new scheme["Symbol"]("issue-deprecation-warning");
var v_1406 = scheme["TRUE"];
var v_1407 = 35;
var v_1408 = scheme["primitives"]["cached-toplevel-box"](v_1407, v_1405, v_1406);
var v_1409 = scheme["primitives"]["box-ref"](v_1408);
var v_1410 = new scheme["String"]("Import (ice-9 threads) to have access to `lock-mutex'.");
scheme["primitives"]["handle-interrupts"]();
var k_1857 = function(v_vals) {
var v_1411 = v_vals;
var v_1412 = new scheme["Pair"](new scheme["Symbol"]("any"), new scheme["Symbol"]("each-any"));
var v_1413 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1414 = new scheme["Symbol"]("$sc-dispatch");
var v_1415 = scheme["FALSE"];
var v_1416 = scheme["TRUE"];
var v_1417 = scheme["primitives"]["cached-module-box"](v_1413, v_1414, v_1415, v_1416);
var v_1418 = scheme["primitives"]["box-ref"](v_1417);
scheme["primitives"]["handle-interrupts"]();
var k_1867 = function(v_tmp, v_rest) {
var v_1419 = v_tmp;
var v_1420 = v_rest;
if (scheme["is_true"](v_1419)) {
{
var v_1439 = new scheme["Closure"](k_1915, 0);
var v_1440 = 0;
var v_1441 = scheme["primitives"]["builtin-ref"](v_1440);
scheme["primitives"]["handle-interrupts"]();
return v_1441["fun"](v_1441, k_1898, v_1439, v_1419);
}
} else {
{
var v_1421 = scheme["EMPTY"];
var v_1422 = scheme["primitives"]["cons"](v_1404, v_1421);
var v_1423 = new scheme["Closure"](k_1899, 0);
var v_1424 = 0;
var v_1425 = scheme["primitives"]["builtin-ref"](v_1424);
scheme["primitives"]["handle-interrupts"]();
var k_1876 = function(v_arg, v_rest) {
var v_1426 = v_arg;
var v_1427 = v_rest;
if (scheme["is_true"](v_1426)) {
{
var v_1436 = new scheme["Closure"](k_1909, 0);
var v_1437 = 0;
var v_1438 = scheme["primitives"]["builtin-ref"](v_1437);
scheme["primitives"]["handle-interrupts"]();
return v_1438["fun"](v_1438, k_1898, v_1436, v_1422);
}
} else {
{
var v_1428 = scheme["FALSE"];
var v_1429 = new scheme["String"]("source expression failed to match any pattern");
var v_1430 = scheme["list"](new scheme["Symbol"]("guile"));
var v_1431 = new scheme["Symbol"]("syntax-violation");
var v_1432 = scheme["FALSE"];
var v_1433 = scheme["TRUE"];
var v_1434 = scheme["primitives"]["cached-module-box"](v_1430, v_1431, v_1432, v_1433);
var v_1435 = scheme["primitives"]["box-ref"](v_1434);
scheme["primitives"]["handle-interrupts"]();
return v_1435["fun"](v_1435, k_1898, v_1428, v_1429, v_1404);
}
}
};
return v_1425["fun"](v_1425, k_1876, v_1423, v_1422);
}
}
};
return v_1418["fun"](v_1418, k_1867, v_1404, v_1412);
};
return v_1409["fun"](v_1409, k_1857, v_1410);
};
if (arguments["length"] == 3) {
{
return k_1848(v_1403, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1899 = function(v_1442, k_1908) {
var k_1900 = function(v_1442, v_id) {
var v_1443 = v_id;
var v_1444 = new scheme["Symbol"]("identifier?");
var v_1445 = scheme["TRUE"];
var v_1446 = 35;
var v_1447 = scheme["primitives"]["cached-toplevel-box"](v_1446, v_1444, v_1445);
var v_1448 = scheme["primitives"]["box-ref"](v_1447);
scheme["primitives"]["handle-interrupts"]();
return v_1448["fun"](v_1448, k_1908, v_1443);
};
if (arguments["length"] == 3) {
{
return k_1900(v_1442, arguments[2]);
}
} else {
{
return undefined;
}
}
};
var k_1909 = function(v_1449, k_1914) {
var k_1910 = function(v_1449, v_id) {
var v_1450 = v_id;
var v_1451 = scheme["Syntax"](
new scheme["Symbol"]("threads:lock-mutex"),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("id")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-e0"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-ee"))),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), scheme["EMPTY"], scheme["EMPTY"], scheme["EMPTY"]),
new scheme["Vector"](new scheme["Symbol"]("ribcage"), new scheme["Vector"](new scheme["Symbol"]("x")), new scheme["Vector"](scheme["list"](new scheme["Symbol"]("m-1e3d92e2925abd71-e0"), new scheme["Symbol"]("top"))), new scheme["Vector"](new scheme["String"]("l-1e3d92e2925abd71-e3"))),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-recursive-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("join-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("cancel-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("yield"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("call-with-new-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated"))))
)
),
new scheme["Vector"](
new scheme["Symbol"]("ribcage"),
scheme["list"](
new scheme["Symbol"]("current-processor-count"),
new scheme["Symbol"]("total-processor-count"),
new scheme["Symbol"]("thread-exited?"),
new scheme["Symbol"]("all-threads"),
new scheme["Symbol"]("current-thread"),
new scheme["Symbol"]("condition-variable?"),
new scheme["Symbol"]("broadcast-condition-variable"),
new scheme["Symbol"]("signal-condition-variable"),
new scheme["Symbol"]("wait-condition-variable"),
new scheme["Symbol"]("make-condition-variable"),
new scheme["Symbol"]("mutex-locked?"),
new scheme["Symbol"]("mutex-level"),
new scheme["Symbol"]("mutex-owner"),
new scheme["Symbol"]("mutex?"),
new scheme["Symbol"]("unlock-mutex"),
new scheme["Symbol"]("try-mutex"),
new scheme["Symbol"]("lock-mutex"),
new scheme["Symbol"]("make-recursive-mutex"),
new scheme["Symbol"]("make-mutex"),
new scheme["Symbol"]("thread?"),
new scheme["Symbol"]("join-thread"),
new scheme["Symbol"]("cancel-thread"),
new scheme["Symbol"]("yield"),
new scheme["Symbol"]("call-with-new-thread")
),
scheme["list"](
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top")),
scheme["list"](new scheme["Symbol"]("top"))
),
scheme["list"](
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("total-processor-count"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("thread-exited?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("all-threads"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("current-thread"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("condition-variable?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("broadcast-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("signal-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("wait-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("make-condition-variable"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-locked?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-level"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex-owner"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("mutex?"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("unlock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("try-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
new scheme["Pair"](scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")), scheme["Syntax"](new scheme["Symbol"]("lock-mutex"), scheme["list"](scheme["list"](new scheme["Symbol"]("top"))), scheme["list"](new scheme["Symbol"]("hygiene"), new scheme["Symbol"]("ice-9"), new scheme["Symbol"]("deprecated")))),
ne
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment