use min.scm in bootstrap + minification of scheme code

README.md

@@ -2,7 +2,7 @@
 
 [![npm](https://img.shields.io/badge/npm-1.0.0%E2%80%93beta.14-blue.svg)](https://www.npmjs.com/package/@jcubic/lips)
 ![1.0.0 Complete](https://img.shields.io/github/milestones/progress-percent/jcubic/lips/1?label=1.0.0%20Complete)
-[![travis](https://travis-ci.org/jcubic/lips.svg?branch=master&da387aecaed52cc2e496570e97336a90be03d425)](https://travis-ci.org/jcubic/lips)
+[![travis](https://travis-ci.org/jcubic/lips.svg?branch=master&f87942006cf306934091c9f7d2f42ff1602208bd)](https://travis-ci.org/jcubic/lips)
 [![Coverage Status](https://coveralls.io/repos/github/jcubic/lips/badge.svg?branch=master&25a417d0b61dd73dde71da232355132a)](https://coveralls.io/github/jcubic/lips?branch=master)
 [![Join Gitter Chat](https://badges.gitter.im/Join%20Chat.svg)](https://gitter.im/jcubic/lips)
 [![GitHub license](https://img.shields.io/github/license/jcubic/lips.svg)](https://github.com/jcubic/lips/blob/master/LICENSE)

dist/lips.js

@@ -31,7 +31,7 @@
  * Copyright (c) 2014-present, Facebook, Inc.
  * released under MIT license
  *
- * build: Fri, 04 Jun 2021 11:25:19 +0000
+ * build: Fri, 04 Jun 2021 12:09:05 +0000
  */
 (function () {
 	'use strict';
@@ -10590,14 +10590,14 @@
 	    '#t': true,
 	    '#f': false,
 	    nil: _nil,
-	    eof: eof,
 	    'null': null,
 	    'NaN': nan,
 	    '+nan.0': nan,
 	    '-nan.0': nan
 	  }; // -------------------------------------------------------------------------
 
 	  var global_env = new Environment({
+	    eof: eof,
 	    undefined: undefined$1,
 	    // undefined as parser constant breaks most of the unit tests
 	    // ---------------------------------------------------------------------
@@ -14200,7 +14200,7 @@
 	    }
 
 	    var load = global_env.get('load');
-	    return load.call(lips.env, "".concat(url, "dist/std.scm"), global_env);
+	    return load.call(lips.env, "".concat(url, "dist/std.min.scm"), global_env);
 	  } // -------------------------------------------------------------------------
 
 
@@ -14506,10 +14506,10 @@
 
 	  var banner = function () {
 	    // Rollup tree-shaking is removing the variable if it's normal string because
-	    // obviously 'Fri, 04 Jun 2021 11:25:19 +0000' == '{{' + 'DATE}}'; can be removed
+	    // obviously 'Fri, 04 Jun 2021 12:09:05 +0000' == '{{' + 'DATE}}'; can be removed
 	    // but disablig Tree-shaking is adding lot of not used code so we use this
 	    // hack instead
-	    var date = LString('Fri, 04 Jun 2021 11:25:19 +0000').valueOf();
+	    var date = LString('Fri, 04 Jun 2021 12:09:05 +0000').valueOf();
 
 	    var _date = date === '{{' + 'DATE}}' ? new Date() : new Date(date);
 
@@ -14554,7 +14554,7 @@
 	  var lips = {
 	    version: '1.0.0-beta.14',
 	    banner: banner,
-	    date: 'Fri, 04 Jun 2021 11:25:19 +0000',
+	    date: 'Fri, 04 Jun 2021 12:09:05 +0000',
 	    exec: exec,
 	    // unwrap async generator into Promise<Array>
 	    parse: compose(uniterate_async, parse),

dist/std.min.scm

@@ -236,7 +236,7 @@
 (define (angle x) "(angle x)\u000A\u000AReturns angle of the complex number in polar coordinate system." (if (not (%number-type "complex" x)) (error "angle: number need to be complex") (Math.atan2 x.__im__ x.__re__)))
 (define (magnitude x) "(magnitude x)\u000A\u000AReturns magnitude of the complex number in polar coordinate system." (if (not (%number-type "complex" x)) (error "magnitude: number need to be complex") (sqrt (+ (* x.__im__ x.__im__) (* x.__re__ x.__re__)))))
 (define random (let ((a 69069) (c 1) (m (expt 2 32)) (seed 19380110)) (lambda new-seed "(random)\u000A(random seed)\u000A\u000AFunction generate new random real number using Knuth algorithm." (if (pair? new-seed) (set! seed (car new-seed)) (set! seed (modulo (+ (* seed a) c) m))) (exact->inexact (/ seed m)))))
-(define (eof-object? obj) "(eof-object? arg)\u000A\u000AFunction check if value is eof object, returned from input string\u000Aport when there are no more data to read." (eq? obj #<eof>))
+(define (eof-object? obj) "(eof-object? arg)\u000A\u000AFunction check if value is eof object, returned from input string\u000Aport when there are no more data to read." (eq? obj eof))
 (define (output-port? obj) "(output-port? arg)\u000A\u000AFunction return true if argument is output port." (instanceof lips.OutputPort obj))
 (define (input-port? obj) "(input-port? arg)\u000A\u000AFunction return true if argument is input port." (instanceof lips.InputPort obj))
 (define (char-ready? . rest) "(char-ready?)\u000A(char-ready? port)\u000A\u000AFunction check it characters is ready in input port. This is usefull mostly\u000Afor interactive ports that return false if it would wait for user input.\u000AIt return false if port is closed." (let ((port (if (null? rest) (current-input-port) (car rest)))) (typecheck "char-ready?" port "input-port") (port.char_ready)))

src/lips.js

@@ -6780,14 +6780,14 @@
         '#t': true,
         '#f': false,
         nil,
-        eof,
         'null': null,
         'NaN': nan,
         '+nan.0': nan,
         '-nan.0': nan
     };
     // -------------------------------------------------------------------------
     var global_env = new Environment({
+        eof,
         undefined, // undefined as parser constant breaks most of the unit tests
         // ---------------------------------------------------------------------
         'peek-char': doc('peek-char', function(port = null) {
@@ -9859,7 +9859,7 @@
             url += '/';
         }
         var load = global_env.get('load');
-        return load.call(lips.env, `${url}dist/std.scm`, global_env);
+        return load.call(lips.env, `${url}dist/std.min.scm`, global_env);
     }
     // -------------------------------------------------------------------------
     function Worker(url) {