25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
# File 'lib/nydp/core.rb', line 25
def setup ns
ns.assign(:cons , Nydp::Builtin::RubyWrap::Cons.instance )
ns.assign(:car , Nydp::Builtin::RubyWrap::Car.instance )
ns.assign(:cdr , Nydp::Builtin::RubyWrap::Cdr.instance )
ns.assign(:log , Nydp::Builtin::Log.instance )
ns.assign(:ln , Nydp::Builtin::RubyWrap::Ln.instance )
ns.assign(:mod , Nydp::Builtin::RubyWrap::Modulo.instance )
ns.assign(:sqrt , Nydp::Builtin::RubyWrap::Sqrt.instance )
ns.assign(:regexp , Nydp::Builtin::RubyWrap::Regexp.instance )
ns.assign("string/pad-left" , Nydp::Builtin::RubyWrap::StringPadLeft.instance )
ns.assign("string/pad-right" , Nydp::Builtin::RubyWrap::StringPadRight.instance)
ns.assign("string/force-encoding", Nydp::Builtin::RubyWrap::StringForceEncoding.instance)
ns.assign("to-list" , Nydp::Builtin::RubyWrap::ToList.instance )
ns.assign(:+ , Nydp::Builtin::Plus.instance )
ns.assign(:- , Nydp::Builtin::Minus.instance )
ns.assign(:* , Nydp::Builtin::Times.instance )
ns.assign(:/ , Nydp::Builtin::Divide.instance )
ns.assign(:> , Nydp::Builtin::GreaterThan.instance )
ns.assign(:< , Nydp::Builtin::LessThan.instance )
ns.assign(:eval , Nydp::Builtin::Eval.new(ns) )
ns.assign(:false , false )
ns.assign(:hash , Nydp::Builtin::Hash.instance )
ns.assign(:apply , Nydp::Builtin::Apply.instance )
ns.assign(:date , Nydp::Builtin::Date.instance )
ns.assign(:error , Nydp::Builtin::Error.instance )
ns.assign(:parse , Nydp::Builtin::Parse.instance )
ns.assign(:p , Nydp::Builtin::Puts.instance )
ns.assign(:PI , Math::PI )
ns.assign(:"π" , Math::PI )
ns.assign(:rand , Nydp::Builtin::Rand.instance )
ns.assign(:rng , Nydp::Builtin::RNG.instance )
ns.assign(:sort , Nydp::Builtin::Sort.instance )
ns.assign(:abs , Nydp::Builtin::Abs.instance )
ns.assign(:sym , Nydp::Builtin::Sym.instance )
ns.assign(:ensuring , Nydp::Builtin::Ensuring.instance )
ns.assign(:inspect , Nydp::Builtin::Inspect.instance )
ns.assign(:comment , Nydp::Builtin::Comment.instance )
ns.assign("handle-error" , Nydp::Builtin::HandleError.instance )
ns.assign("parse-in-string" , Nydp::Builtin::ParseInString.instance )
ns.assign("random-string" , Nydp::Builtin::RandomString.instance )
ns.assign("to-string" , Nydp::Builtin::ToString.instance )
ns.assign("to-integer" , Nydp::Builtin::ToInteger.instance )
ns.assign("string-length" , Nydp::Builtin::StringLength.instance )
ns.assign("string-replace" , Nydp::Builtin::StringReplace.instance )
ns.assign("string-match" , Nydp::Builtin::StringMatch.instance )
ns.assign("string-split" , Nydp::Builtin::StringSplit.instance )
ns.assign("time" , Nydp::Builtin::Time.instance )
ns.assign("thread-locals" , Nydp::Builtin::ThreadLocals.instance )
ns.assign("type-of" , Nydp::Builtin::TypeOf.instance )
ns.assign(:"eq?" , Nydp::Builtin::IsEqual.instance )
ns.assign(:"cdr-set" , Nydp::Builtin::CdrSet.instance )
ns.assign(:"hash-get" , Nydp::Builtin::HashGet.instance )
ns.assign(:"hash-set" , Nydp::Builtin::HashSet.instance )
ns.assign(:"hash-keys" , Nydp::Builtin::HashKeys.instance )
ns.assign(:"hash-key?" , Nydp::Builtin::HashKeyPresent.instance )
ns.assign(:"hash-merge" , Nydp::Builtin::HashMerge.instance )
ns.assign(:"hash-slice" , Nydp::Builtin::HashSlice.instance )
ns.assign(:"hash-to-array" , Nydp::Builtin::HashToArray.instance )
ns.assign(:"vm-info" , Nydp::Builtin::VmInfo.instance )
ns.assign(:"pre-compile-new-expression", Nydp::Builtin::PreCompile.instance )
ns.assign(:"script-run" , Nydp::Builtin::ScriptRun.instance )
ns.assign(:"**" , Nydp::Builtin::MathPower.instance )
ns.assign(:"⌊" , Nydp::Builtin::MathFloor.instance )
ns.assign(:"math-floor" , Nydp::Builtin::MathFloor.instance )
ns.assign(:"⌈" , Nydp::Builtin::MathCeiling.instance )
ns.assign(:"math-ceiling" , Nydp::Builtin::MathCeiling.instance )
ns.assign(:"math-round" , Nydp::Builtin::MathRound.instance )
ns.assign(:"⋂" , Nydp::Builtin::SetIntersection.instance )
ns.assign(:"set-intersection", Nydp::Builtin::SetIntersection.instance )
ns.assign(:"⋃" , Nydp::Builtin::SetUnion.instance )
ns.assign(:"set-union" , Nydp::Builtin::SetUnion.instance )
end
|