Lines Matching refs:function
18 function initRuntime() {
19 function escapeHTML(s) {
33 function(s) {
42 function sc_print_debug() {
52 function sc_alert() {
65 function sc_typeof( x ) {
70 function sc_error() {
81 function sc_raise(obj) {
86 function sc_withHandlerLambda(handler, body) {
100 function sc_putpropBang(sym, key, val) {
110 function sc_getprop(sym, key) {
122 function sc_rempropBang(sym, key) {
129 function sc_any2String(o) {
137 function sc_isEqv(o1, o2) {
145 function sc_isEq(o1, o2) {
152 function sc_isNumber(n) {
159 function sc_isComplex(n) {
166 function sc_isReal(n) {
173 function sc_isRational(n) {
180 function sc_isInteger(n) {
189 function sc_isExact(n) {
197 function sc_isInexact(n) {
205 function sc_equal(x) {
216 function sc_less(x) {
229 function sc_greater(x, y) {
242 function sc_lessEqual(x, y) {
255 function sc_greaterEqual(x, y) {
268 function sc_isZero(x) {
276 function sc_isPositive(x) {
284 function sc_isNegative(x) {
292 function sc_isOdd(x) {
300 function sc_isEven(x) {
312 function sc_plus() {
322 function sc_multi() {
332 function sc_minus(x) {
346 function sc_div(x) {
363 function sc_quotient(x, y) {
370 function sc_remainder(x, y) {
377 function sc_modulo(x, y) {
386 function sc_euclid_gcd(a, b) {
403 function sc_gcd() {
411 function sc_lcm() {
423 // function sc_numerator(x) {
428 // function sc_denominator(x) {
474 function sc_exact2inexact(x) {
481 function sc_inexact2exact(x) {
485 function sc_number2jsstring(x, radix) {
492 function sc_jsstring2number(s, radix) {
519 function sc_not(b) {
526 function sc_isBoolean(b) {
530 function sc_Pair(car, cdr) {
535 sc_Pair.prototype.toString = function() {
538 sc_Pair.prototype.sc_toWriteOrDisplayString = function(writeOrDisplay) {
559 sc_Pair.prototype.sc_toDisplayString = function() {
562 sc_Pair.prototype.sc_toWriteString = function() {
571 function sc_isPair(p) {
575 function sc_isPairEqual(p1, p2, comp) {
582 function sc_cons(car, cdr) {
587 function sc_consStar() {
597 function sc_car(p) {
604 function sc_cdr(p) {
611 function sc_setCarBang(p, val) {
618 function sc_setCdrBang(p, val) {
625 function sc_caar(p) { return p.car.car; }
629 function sc_cadr(p) { return p.cdr.car; }
633 function sc_cdar(p) { return p.car.cdr; }
637 function sc_cddr(p) { return p.cdr.cdr; }
641 function sc_caaar(p) { return p.car.car.car; }
645 function sc_cadar(p) { return p.car.cdr.car; }
649 function sc_caadr(p) { return p.cdr.car.car; }
653 function sc_caddr(p) { return p.cdr.cdr.car; }
657 function sc_cdaar(p) { return p.car.car.cdr; }
661 function sc_cdadr(p) { return p.cdr.car.cdr; }
665 function sc_cddar(p) { return p.car.cdr.cdr; }
669 function sc_cdddr(p) { return p.cdr.cdr.cdr; }
673 function sc_caaaar(p) { return p.car.car.car.car; }
677 function sc_caadar(p) { return p.car.cdr.car.car; }
681 function sc_caaadr(p) { return p.cdr.car.car.car; }
685 function sc_caaddr(p) { return p.cdr.cdr.car.car; }
689 function sc_cdaaar(p) { return p.car.car.car.cdr; }
693 function sc_cdadar(p) { return p.car.cdr.car.cdr; }
697 function sc_cdaadr(p) { return p.cdr.car.car.cdr; }
701 function sc_cdaddr(p) { return p.cdr.cdr.car.cdr; }
705 function sc_cadaar(p) { return p.car.car.cdr.car; }
709 function sc_caddar(p) { return p.car.cdr.cdr.car; }
713 function sc_cadadr(p) { return p.cdr.car.cdr.car; }
717 function sc_cadddr(p) { return p.cdr.cdr.cdr.car; }
721 function sc_cddaar(p) { return p.car.car.cdr.cdr; }
725 function sc_cdddar(p) { return p.car.cdr.cdr.cdr; }
729 function sc_cddadr(p) { return p.cdr.car.cdr.cdr; }
733 function sc_cddddr(p) { return p.cdr.cdr.cdr.cdr; }
736 function sc_lastPair(l) {
751 function sc_isNull(o) {
758 function sc_isList(o) {
779 function sc_list() {
788 function sc_iota(num, init) {
797 function sc_makeList(nbEls, fill) {
805 function sc_length(l) {
815 function sc_remq(o, l) {
829 function sc_remqBang(o, l) {
850 function sc_delete(o, l) {
864 function sc_deleteBang(o, l) {
884 function sc_reverseAppendBang(l1, l2) {
895 function sc_dualAppend(l1, l2) {
903 function sc_append() {
912 function sc_dualAppendBang(l1, l2) {
922 function sc_appendBang() {
930 function sc_reverse(l1) {
940 function sc_reverseBang(l) {
945 function sc_listTail(l, k) {
954 function sc_listRef(l, k) {
959 function sc_memX(o, l, comp) {
967 function sc_memq(o, l) { return sc_memX(o, l, sc_isEq); }
968 function sc_memv(o, l) { return sc_memX(o, l, sc_isEqv); }
969 function sc_member(o, l) { return sc_memX(o, l, sc_isEqual); }
974 function sc_memq(o, l) {
983 function sc_memv(o, l) {
992 function sc_member(o, l) {
1002 function sc_assX(o, al, comp) {
1010 function sc_assq(o, al) { return sc_assX(o, al, sc_isEq); }
1011 function sc_assv(o, al) { return sc_assX(o, al, sc_isEqv); }
1012 function sc_assoc(o, al) { return sc_assX(o, al, sc_isEqual); }
1016 function sc_assq(o, al) {
1025 function sc_assv(o, al) {
1034 function sc_assoc(o, al) {
1044 function sc_isCharStringEqual(cs1, cs2) { return cs1.val === cs2.val; }
1045 function sc_isCharStringLess(cs1, cs2) { return cs1.val < cs2.val; }
1046 function sc_isCharStringGreater(cs1, cs2) { return cs1.val > cs2.val; }
1047 function sc_isCharStringLessEqual(cs1, cs2) { return cs1.val <= cs2.val; }
1048 function sc_isCharStringGreaterEqual(cs1, cs2) { return cs1.val >= cs2.val; }
1049 function sc_isCharStringCIEqual(cs1, cs2)
1051 function sc_isCharStringCILess(cs1, cs2)
1053 function sc_isCharStringCIGreater(cs1, cs2)
1055 function sc_isCharStringCILessEqual(cs1, cs2)
1057 function sc_isCharStringCIGreaterEqual(cs1, cs2)
1063 function sc_Char(c) {
1161 sc_Char.prototype.toString = function() {
1165 sc_Char.prototype.sc_toWriteString = function() {
1177 function sc_isChar(c) {
1237 function sc_isCharOfClass(c, cl) { return (cl.indexOf(c) != -1); }
1241 function sc_isCharAlphabetic(c)
1248 function sc_isCharNumeric(c)
1253 function sc_isCharWhitespace(c) {
1261 function sc_isCharUpperCase(c)
1267 function sc_isCharLowerCase(c)
1273 function sc_char2integer(c)
1278 function sc_integer2char(n)
1284 function sc_charUpcase(c)
1289 function sc_charDowncase(c)
1292 function sc_makeJSStringOfLength(k, c) {
1310 function sc_makejsString(k, c) {
1319 function sc_jsstring2list(s) {
1326 function sc_list2jsstring(l) {
1337 sc_Vector.prototype.sc_toWriteOrDisplayString = function(writeOrDisplay) {
1346 sc_Vector.prototype.sc_toDisplayString = function() {
1349 sc_Vector.prototype.sc_toWriteString = function() {
1357 function sc_isVector(v) {
1362 function sc_isVectorEqual(v1, v2, comp) {
1370 function sc_makeVector(size, fill) {
1380 function sc_vector() {
1390 function sc_vectorLength(v) {
1397 function sc_vectorRef(v, pos) {
1404 function sc_vectorSetBang(v, pos, val) {
1409 function sc_vector2list(a) {
1417 function sc_list2vector(l) {
1427 function sc_vectorFillBang(a, fill) {
1434 function sc_copyVector(a, len) {
1447 function sc_vectorCopy(a, start, end) {
1452 function sc_vectorCopyBang(target, tstart, source, sstart, send) {
1474 (peephole (hole 1 "typeof " o " === 'function'")))
1476 function sc_isProcedure(o) {
1477 return (typeof o === "function");
1481 function sc_apply(proc) {
1495 function sc_map(proc, l1) {
1513 function sc_mapBang(proc, l1) {
1532 function sc_forEach(proc, l1) {
1550 function sc_filter(proc, l1) {
1564 function sc_filterBang(proc, l1) {
1579 function sc_filterMap1(proc, l1) {
1588 function sc_filterMap2(proc, l1, l2) {
1600 function sc_filterMap(proc, l1, l2, l3) {
1621 function sc_any(proc, l) {
1634 function sc_anyPred(proc, l) {
1639 function sc_every(proc, l) {
1653 function sc_everyPred(proc, l) {
1662 function sc_force(o) {
1667 function sc_makePromise(proc) {
1670 return function() {
1682 function sc_Values(values) {
1689 function sc_values() {
1697 function sc_callWithValues(producer, consumer) {
1706 function sc_dynamicWind(before, thunk, after) {
1723 function sc_Struct(name) {
1726 sc_Struct.prototype.sc_toDisplayString = function() {
1734 function sc_makeStruct(name) {
1742 function sc_isStruct(o) {
1750 function sc_isStructNamed(name, s) {
1757 function sc_getStructField(s, name, field) {
1764 function sc_setStructFieldBang(s, name, field, val) {
1771 function sc_bitNot(x) {
1778 function sc_bitAnd(x, y) {
1785 function sc_bitOr(x, y) {
1792 function sc_bitXor(x, y) {
1799 function sc_bitLsh(x, y) {
1806 function sc_bitRsh(x, y) {
1813 function sc_bitUrsh(x, y) {
1820 function sc_jsField(o, field) {
1827 function sc_setJsFieldBang(o, field, val) {
1834 function sc_deleteJsFieldBang(o, field) {
1841 function sc_jsCall(o, fun) {
1851 function sc_jsMethodCall(o, field) {
1861 function sc_jsNew(c) {
1872 function sc_pregexp(re) {
1877 function sc_pregexpMatch(re, s) {
1895 function sc_pregexpReplace(re, s1, s2) {
1913 function sc_pregexpReplaceAll(re, s1, s2) {
1931 function sc_pregexpSplit(re, s) {
1951 function sc_random(n) {
1958 function sc_currentDate() {
1962 function sc_Hashtable() {
1964 sc_Hashtable.prototype.toString = function() {
1969 function sc_HashtableElement(key, val) {
1977 function sc_makeHashtable() {
1982 function sc_hashtablePutBang(ht, key, val) {
1988 function sc_hashtableGet(ht, key) {
1997 function sc_hashtableForEach(ht, f) {
2007 function sc_hashtableContains(ht, key) {
2017 function sc_hash(o) {
2035 function sc_counterHash() {
2043 function sc_Trampoline(args, maxTailCalls) {
2049 sc_Trampoline.prototype.restart = function() {
2064 function sc_bindExitLambda(proc) {
2066 var escape = function(res) {
2079 function sc_BindExitException() {
2093 function sc_EOF() {
2097 function sc_Port() {
2102 function sc_InputPort() {
2106 sc_InputPort.prototype.peekChar = function() {
2111 sc_InputPort.prototype.readChar = function() {
2116 sc_InputPort.prototype.isCharReady = function() {
2119 sc_InputPort.prototype.close = function() {
2124 function sc_ErrorInputPort() {
2127 sc_ErrorInputPort.prototype.getNextChar = function() {
2130 sc_ErrorInputPort.prototype.isCharReady = function() {
2137 function sc_StringInputPort(jsStr) {
2145 sc_StringInputPort.prototype.getNextChar = function() {
2152 function sc_Token(type, val, pos) {
2180 function sc_Tokenizer(port) {
2183 sc_Tokenizer.prototype.peekToken = function() {
2190 sc_Tokenizer.prototype.readToken = function() {
2195 sc_Tokenizer.prototype.nextToken = function() {
2198 function isNumberChar(c) {
2201 function isIdOrNumberChar(c) {
2205 function isWhitespace(c) {
2208 function isWhitespaceOrEOF(c) {
2212 function readString() {
2268 function readIdOrNumber(firstChar) {
2278 function skipWhitespaceAndComments() {
2297 function readDot() {
2304 function readSharp() {
2411 function sc_Reader(tokenizer) {
2415 sc_Reader.prototype.read = function() {
2416 function readList(listBeginType) {
2417 function matchesPeer(open, close) {
2457 function readQuote() {
2460 function readVector() {
2476 function storeRefence(nb) {
2482 function readReference(nb) {
2528 function sc_read(port) {
2535 function sc_readChar(port) {
2542 function sc_peekChar(port) {
2551 function sc_isCharReady(port) {
2559 function sc_closeInputPort(p) {
2567 function sc_isInputPort(o) {
2575 function sc_isEOFObject(o) {
2582 function sc_currentInputPort() {
2588 function sc_callWithInputFile(s, proc) {
2593 function sc_callWithOutputFile(s, proc) {
2598 function sc_withInputFromFile(s, thunk) {
2603 function sc_withOutputToFile(s, thunk) {
2608 function sc_openInputFile(s) {
2613 function sc_openOutputFile(s) {
2619 function sc_basename(p) {
2629 function sc_dirname(p) {
2641 function sc_withInputFromPort(p, thunk) {
2652 function sc_withInputFromString(s, thunk) {
2657 function sc_withOutputToPort(p, thunk) {
2668 function sc_withOutputToString(thunk) {
2675 function sc_withOutputToProcedure(proc, thunk) {
2676 var t = function(s) { proc(sc_jsstring2string(s)); };
2683 function sc_openOutputString() {
2688 function sc_openInputString(str) {
2694 function sc_OutputPort() {
2697 sc_OutputPort.prototype.appendJSString = function(obj) {
2700 sc_OutputPort.prototype.close = function() {
2704 function sc_StringOutputPort() {
2708 sc_StringOutputPort.prototype.appendJSString = function(s) {
2711 sc_StringOutputPort.prototype.close = function() {
2716 function sc_getOutputString(sp) {
2721 function sc_ErrorOutputPort() {
2724 sc_ErrorOutputPort.prototype.appendJSString = function(s) {
2727 sc_ErrorOutputPort.prototype.close = function() {
2731 function sc_GenericOutputPort(appendJSString, close) {
2742 function sc_isOutputPort(o) {
2749 function sc_closeOutputPort(p) {
2756 function sc_write(o, p) {
2762 function sc_toWriteString(o) {
2771 else if (typeof o === 'function')
2779 function sc_escapeWriteString(s) {
2818 function sc_display(o, p) {
2824 function sc_toDisplayString(o) {
2833 else if (typeof o === 'function')
2844 function sc_newline(p) {
2853 function sc_writeChar(c, p) {
2862 function sc_writeCircle(o, p) {
2868 function sc_toWriteCircleString(o) {
2876 function sc_prepWriteCircle(o, symb, nbPointer) {
2898 function sc_genToWriteCircleString(o, symb) {
2904 sc_Pair.prototype.sc_toWriteCircleString = function(symb, inList) {
2949 sc_Vector.prototype.sc_toWriteCircleString = function(symb) {
2983 function sc_print(s) {
2997 function sc_format(s, args) {
3109 function sc_jsstring2string(s) {
3116 function sc_jsstring2symbol(s) {
3123 function sc_string2jsstring(s) {
3130 function sc_symbol2jsstring(s) {
3137 function sc_keyword2jsstring(k) {
3144 function sc_jsstring2keyword(s) {
3151 function sc_isKeyword(s) {
3158 var sc_gensym = function() {
3160 return function(sym) {
3171 function sc_isEqual(o1, o2) {
3180 function sc_number2symbol(x, radix) {
3188 function sc_symbol2number(s, radix) {
3199 function sc_string2integer(s, radix) {
3207 function sc_string2real(s) {
3215 function sc_isSymbol(s) {
3223 function sc_symbol2string(s) {
3230 function sc_string2symbol(s) {
3237 function sc_symbolAppend() {
3247 function sc_char2string(c) { return c.val; }
3252 function sc_char2symbol(c) { return sc_SYMBOL_PREFIX + c.val; }
3257 function sc_isString(s) {
3267 function sc_string() {
3276 function sc_stringLength(s) { return s.length; }
3279 function sc_stringRef(s, k) {
3284 function sc_stringSet(s, k, c)
3292 function sc_isStringEqual(s1, s2) {
3299 function sc_isStringLess(s1, s2) {
3306 function sc_isStringGreater(s1, s2) {
3313 function sc_isStringLessEqual(s1, s2) {
3320 function sc_isStringGreaterEqual(s1, s2) {
3327 function sc_isStringCIEqual(s1, s2) {
3334 function sc_isStringCILess(s1, s2) {
3341 function sc_isStringCIGreater(s1, s2) {
3348 function sc_isStringCILessEqual(s1, s2) {
3355 function sc_isStringCIGreaterEqual(s1, s2) {
3362 function sc_substring(s, start, end) {
3368 function sc_isSubstring_at(s1, s2, i) {
3375 function sc_stringAppend() {
3388 function sc_stringCopy(s) {
3393 function sc_stringFill(s, c)
3399 function sc_keyword2string(o) {
3406 function sc_string2keyword(o) {
3410 String.prototype.sc_toDisplayString = function() {
3420 String.prototype.sc_toWriteString = function() {
3462 BgL_nboyerzd2benchmarkzd2 = function() {
3468 return ((n = ((args === null)?(0):(args.car))), (BgL_setupzd2boyerzd2()), (BgL_runzd2benchmarkzd2(("nboyer"+(sc_number2string(n))), (1), function() {
3470 }, function(rewrites) {
3499 BgL_setupzd2boyerzd2 = function() {
3502 BgL_testzd2boyerzd2 = function() {
3505 translate_term_nboyer = function(term) {
3509 translate_args_nboyer = function(lst) {
3514 untranslate_term_nboyer = function(term) {
3538 BgL_sc_symbolzd2ze3symbolzd2record_1ze3_nboyer = function(sym) {
3544 translate_alist_nboyer = function(alist) {
3549 apply_subst_nboyer = function(alist, term) {
3554 apply_subst_lst_nboyer = function(alist, lst) {
3558 tautologyp_nboyer = function(sc_x_11, true_lst, false_lst) {
3598 rewrite_nboyer = function(term) {
3624 rewrite_args_nboyer = function(lst) {
3629 one_way_unify1_nboyer = function(term1, term2) {
3676 trans_of_implies1_nboyer = function(n) {
3680 is_term_equal_nboyer = function(x, y) {
3714 is_term_member_nboyer = function(x, lst) {
3727 BgL_setupzd2boyerzd2 = function() {
3761 BgL_testzd2boyerzd2 = function(n) {
3807 BgL_makezd2parserzd2 = function(grammar, lexer) {
3830 ind = function(nt, sc_nts_10) {
3845 (sc_nts_8 = ((BgL_sc_defzd2loop_9zd2 = function(defs, sc_nts_11) {
3849 return ((defs instanceof sc_Pair)?((def = (defs.car)), (head = (def.car)), (rule_loop = function(rules, sc_nts_12) {
3873 (nb_confs = (((BgL_sc_defzd2loop_6zd2 = function(defs, BgL_sc_nbzd2confs_14zd2) {
3876 return ((defs instanceof sc_Pair)?((def = (defs.car)), (rule_loop = function(rules, BgL_sc_nbzd2confs_15zd2) {
3918 def_loop = function(defs, conf) {
3922 return ((defs instanceof sc_Pair)?((def = (defs.car)), (head = (def.car)), (rule_loop = function(rules, conf, rule_num) {
3959 return function(input) {
4017 sc_ind_43 = function(nt, sc_nts_49) {
4032 make_states = function(BgL_sc_nbzd2toks_50zd2, BgL_sc_nbzd2confs_51zd2) {
4050 BgL_sc_confzd2setzd2getza2_44za2 = function(state, BgL_sc_statezd2num_53zd2, sc_conf_54) {
4055 conf_set_merge_new_bang = function(conf_set) {
4058 conf_set_adjoin = function(state, conf_set, sc_conf_56, i) {
4062 BgL_sc_confzd2setzd2adjoinza2_45za2 = function(sc_states_57, BgL_sc_statezd2num_58zd2, l, i) {
4086 BgL_sc_confzd2setzd2adjoinza2za2_46z00 = function(sc_states_60, BgL_sc_statesza2_61za2, BgL_sc_statezd2num_62zd2, sc_conf_63, i) {
4093 conf_set_union = function(state, conf_set, sc_conf_66, other_set) {
4109 forw = function(sc_states_67, BgL_sc_statezd2num_68zd2, sc_starters_69, sc_enders_70, sc_predictors_71, sc_steps_72, sc_nts_73) {
4182 sc_loop1_75 = function(l) {
4219 is_parsed = function(nt, i, j, sc_nts_86, sc_enders_87, sc_states_88) {
4248 deriv_trees = function(sc_conf_91, i, j, sc_enders_92, sc_steps_93, sc_names_94, sc_toks_95, sc_states_96, BgL_sc_nbzd2nts_97zd2) {
4252 return ((name = (sc_names_94[sc_conf_91])), ((name!== false)?((sc_conf_91<BgL_sc_nbzd2nts_97zd2)?(sc_list((sc_list(name, ((sc_toks_95[i]).car))))):(sc_list((sc_list(name))))):((prev = (sc_conf_91-(1))), (sc_loop1_98 = function(l1, l2) {
4266 loop2 = function(k, l2) {
4280 loop3 = function(l3, l2) {
4318 BgL_sc_derivzd2treesza2_47z70 = function(nt, i, j, sc_nts_101, sc_enders_102, sc_steps_103, sc_names_104, sc_toks_105, sc_states_106) {
4351 nb_deriv_trees = function(sc_conf_110, i, j, sc_enders_111, sc_steps_112, sc_toks_113, sc_states_114, BgL_sc_nbzd2nts_115zd2) {
4355 return ((prev = (sc_conf_110-(1))), ((((tmp1124 = (sc_conf_110<BgL_sc_nbzd2nts_115zd2)), ((tmp1124!== false)?tmp1124:((sc_steps_112[prev])<(0))))!== false)?(1):((sc_loop1_116 = function(l, sc_n_118) {
4397 BgL_sc_nbzd2derivzd2treesza2_48za2 = function(nt, i, j, sc_nts_119, sc_enders_120, sc_steps_121, sc_toks_122, sc_states_123) {
4505 loop1 = function() {
4534 sc_loop1_127 = function(l) {
4586 BgL_parsezd2ze3parsedzf3zc2 = function(parse, nt, i, j) {
4593 BgL_parsezd2ze3treesz31 = function(parse, nt, i, j) {
4603 BgL_parsezd2ze3nbzd2treesze3 = function(parse, nt, i, j) {
4612 test = function(k) {
4615 return ((p = (BgL_makezd2parserzd2(const_earley, function(l) {
4635 BgL_earleyzd2benchmarkzd2 = function() {
4641 return ((k = ((args === null)?(7):(args.car))), (BgL_runzd2benchmarkzd2("earley", (1), function() {
4643 }, function(result) {
4651 // Invoke this function to run a benchmark.
4654 // The third argument is a function that runs the benchmark.
4655 // The fourth argument is a unary function that warns if the result
4661 // function () { new Array(1000000); }
4662 // function (v) {
4666 SC_DEFAULT_OUT = new sc_GenericOutputPort(function(s) {});
4669 function RunBenchmark(name, count, run, warn) {
