[jddaniels commit] r164 - in trunk/metamath: . lib src/net/ddaniels/metamath/lisp

[codesite...@google.com]

Author: daniels.douglas
Date: Tue Dec 11 15:22:47 2007
New Revision: 164

Added:
trunk/metamath/lib/
trunk/metamath/lib/scheme-engine.jar (contents, props changed)
trunk/metamath/lib/sisc-lib.jar (contents, props changed)
trunk/metamath/lib/sisc-opt.jar (contents, props changed)
trunk/metamath/lib/sisc.jar (contents, props changed)
Modified:
trunk/metamath/.classpath
trunk/metamath/src/net/ddaniels/metamath/lisp/SchemeScriptFrame.java

Log:
adding scheme scripting library directly to the project

Modified: trunk/metamath/.classpath
==============================================================================
--- trunk/metamath/.classpath (original)
+++ trunk/metamath/.classpath Tue Dec 11 15:22:47 2007
@@ -2,6 +2,9 @@
<classpath>
<classpathentry kind="src" path="src"/>
<classpathentry kind="con" path="org.eclipse.jdt.launching.JRE_CONTAINER"/>
- <classpathentry combineaccessrules="false" kind="src" path="/scripting"/>
+ <classpathentry kind="lib" path="lib/scheme-engine.jar"/>
+ <classpathentry kind="lib" path="lib/sisc.jar"/>
+ <classpathentry kind="lib" path="lib/sisc-lib.jar"/>
+ <classpathentry kind="lib" path="lib/sisc-opt.jar"/>
<classpathentry kind="output" path="bin"/>
</classpath>

Added: trunk/metamath/lib/scheme-engine.jar
==============================================================================
Binary file. No diff available.

Added: trunk/metamath/lib/sisc-lib.jar
==============================================================================
Binary file. No diff available.

Added: trunk/metamath/lib/sisc-opt.jar
==============================================================================
Binary file. No diff available.

Added: trunk/metamath/lib/sisc.jar
==============================================================================
Binary file. No diff available.

Modified: trunk/metamath/src/net/ddaniels/metamath/lisp/SchemeScriptFrame.java
==============================================================================
---
trunk/metamath/src/net/ddaniels/metamath/lisp/SchemeScriptFrame.java (original)
+++
trunk/metamath/src/net/ddaniels/metamath/lisp/SchemeScriptFrame.java
Tue Dec 11 15:22:47 2007
@@ -35,8 +35,15 @@
Container content = this.getContentPane();
//Create a text area.
final JTextArea textArea = new JTextArea(
- "(display \"Hello World\")"
- );
+ "(define fibonacci\n"+
+ " (lambda (n)\n"+
+ " (let loop ((index 1)\n"+
+ " (previous 0)\n"+
+ " (current 1))\n"+
+ " (if (= index n)\n"+
+ " current\n"+
+ " (loop (+ index 1) current (+ previous current))))))\n"
+ );
textArea.setFont(new Font("Serif", Font.ITALIC, 16));
textArea.setLineWrap(true);
textArea.setWrapStyleWord(true);

[codesite...@google.com]