From 638a2d3bc738205e2b683356dc3f669ff4b3eab3 Mon Sep 17 00:00:00 2001 From: handa Date: Sat, 20 Mar 2010 09:00:49 +0000 Subject: [PATCH] *** empty log message *** --- xex.js | 27 +++++++++------------------ 1 file changed, 9 insertions(+), 18 deletions(-) diff --git a/xex.js b/xex.js index 19683a1..705a99b 100644 --- a/xex.js +++ b/xex.js @@ -37,7 +37,7 @@ var Xex = {}; overflow: 'auto' }; // Toggle logging on and off. PARENT if non-null specifies the - // parent of the log node. The log node is appended to the parent. + // parent of the log node. The log node is appended to PARENT. // If PARENT is null, 'body' node is assumed. Xex.LogToggle = function (parent) { @@ -57,7 +57,8 @@ var Xex = {}; return log; } - // Log ARG + // Log ARG (string). INDENT if specified is a number of columns to + // indent. If INDENT is -1, ARG is appended to the last log. Xex.Log = function (arg, indent) { if (! log) @@ -76,10 +77,10 @@ var Xex = {}; else { lines++; - if (lines >= 60) + if (lines >= 256) { node = log.firstElement (); - log.start = lines - 58; + log.start = lines - 254; } else node = document.createElement ('li'); @@ -158,10 +159,7 @@ Xex.Function = function (name, with_var, min_args, max_args) Xex.Subrountine = function (builtin, name, with_var, min_args, max_args) { - this.name = name; - this.with_var = with_var; - this.min_args = min_args; - this.max_args = max_args; + Xex.Function.apply (this, [name, with_var, min_args, max_args]); this.builtin = builtin; } @@ -179,10 +177,7 @@ Xex.Subrountine.prototype.Call = function (domain, vari, args) Xex.SpecialForm = function (builtin, name, with_var, min_args, max_args) { - this.name = name; - this.with_var = with_var; - this.min_args = min_args; - this.max_args = max_args; + Xex.Function.apply (this, [name, with_var, min_args, max_args]); this.builtin = builtin; } @@ -193,9 +188,7 @@ Xex.SpecialForm.prototype.Call = function (domain, vari, args) Xex.Lambda = function (name, min_args, max_args, args, body) { - this.name = name; - this.min_args = min_args; - this.max_args = max_args; + Xex.Function.apply (this, [name, false, min_args, max_args]); this.args = args; this.body = body; } @@ -246,9 +239,7 @@ Xex.Lambda.prototype.Call = function (domain, vari, args) Xex.Macro = function (name, min_args, max_args, args, body) { - this.name = name; - this.min_args = min_args; - this.max_args = max_args; + Xex.Function.apply (this, [name, false, min_args, max_args]); this.args = args; this.body = body; } -- 1.7.10.4