projects
/
jscl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Create a first parameter VALUES (unused by now) in each function and each funcall
[jscl.git]
/
ecmalisp.html
diff --git
a/ecmalisp.html
b/ecmalisp.html
index
b22bf69
..
9610883
100644
(file)
--- a/
ecmalisp.html
+++ b/
ecmalisp.html
@@
-67,7
+67,7
@@
<script src="jqconsole.min.js" type="text/javascript" charset="utf-8"></script>
<script>
$(function () {
<script src="jqconsole.min.js" type="text/javascript" charset="utf-8"></script>
<script>
$(function () {
- var jqconsole = $('#console').jqconsole('Welcome to Ecmalisp!\n\n', '> ');
+ var jqconsole = $('#console').jqconsole('Welcome to Ecmalisp!\n\n', '');
jqconsole.RegisterMatching('(', ')', 'parents');
lisp.write = function(str){
jqconsole.RegisterMatching('(', ')', 'parents');
lisp.write = function(str){
@@
-77,22
+77,23
@@
var startPrompt = function () {
// Start the prompt with history enabled.
var startPrompt = function () {
// Start the prompt with history enabled.
+ jqconsole.Write(lisp.evalString(id, '(CL:PACKAGE-NAME CL:*PACKAGE*)') + '> ', 'jqconsole-prompt');
jqconsole.Prompt(true, function (input) {
// Output input with the class jqconsole-return.
if (input[0] != ','){
try {
jqconsole.Prompt(true, function (input) {
// Output input with the class jqconsole-return.
if (input[0] != ','){
try {
- jqconsole.Write(lisp.print(lisp.evalString(input)) + '\n', 'jqconsole-return');
+ jqconsole.Write(lisp.print(id, lisp.evalString(id, input)) + '\n', 'jqconsole-return');
} catch(error) {
} catch(error) {
- jqconsole.Write('ERROR: ' + error + '\n', 'jqconsole-error');
+ jqconsole.Write('ERROR: ' + (error.message || error) + '\n', 'jqconsole-error');
}
} else {
}
} else {
- jqconsole.Write(lisp.compileString(input.slice(1)) + '\n', 'jqconsole-return');
+ jqconsole.Write(lisp.compileString(id, input.slice(1)) + '\n', 'jqconsole-return');
}
// Restart the prompt.
startPrompt();
}, function(input){
try {
}
// Restart the prompt.
startPrompt();
}, function(input){
try {
- lisp.read(input[0]==','? input.slice(1): input);
+ lisp.read(id, input[0]==','? input.slice(1): input);
} catch(error) {
return 0;
}
} catch(error) {
return 0;
}