Changeset 14717 in project


Ignore:
Timestamp:
05/21/09 03:49:56 (10 years ago)
Author:
Ivan Raikov
Message:

ported environments to Chicken 4

Location:
release/4/environments
Files:
3 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/4/environments/trunk/environments.meta

    r9218 r14717  
    11;;; environments.meta -*- Hen -*-
    2 ((date "2003-07-12")
    3  (egg "environments.egg")
     2
     3((egg "environments.egg")
     4
    45 (synopsis "User defined evaluation environments")
     6
    57 (category lang-exts)
     8
    69 (license "BSD")
     10
    711 (doc-from-wiki)
     12
    813 (files "environments.scm"  "environments.setup" "environments.html")
    9  (author
    10    "<a href=\"mailto:felix@call-with-current-continuation.org\">felix</a>"))
     14
     15 (author "felix"))
  • release/4/environments/trunk/environments.scm

    r10887 r14717  
    3333; Germany
    3434
    35 (declare
    36   (usual-integrations)
    37   (disable-interrupts)
    38   (fixnum)
    39   (inline)
    40   (no-bound-checks)
    41   (no-procedure-checks)
    42   (import ;Not required but nice to know
    43     ##sys#arbitrary-unbound-symbol
    44     ##sys#slot
    45     ##sys#setslot
    46     ##sys#make-vector
    47     ##sys#size
    48     ##sys#error-hook
    49     ##sys#hash-table-location
    50     ##sys#structure?
    51     ##sys#walk-namespace
    52     ##sys#make-structure
    53     ##sys#check-structure
    54     ##sys#check-list
    55     ##sys#copy-env-table
    56     ##sys#check-symbol
    57     ##sys#not-a-proper-list-error
    58     ##sys#hash-table-for-each
    59     ##sys#environment-symbols)
    60   (bound-to-procedure
    61     ##sys#slot
    62     ##sys#setslot
    63     ##sys#make-vector
    64     ##sys#size
    65     ##sys#error-hook
    66     ##sys#hash-table-location
    67     ##sys#structure?
    68     ##sys#walk-namespace
    69     ##sys#make-structure
    70     ##sys#check-structure
    71     ##sys#check-list
    72     ##sys#copy-env-table
    73     ##sys#check-symbol
    74     ##sys#not-a-proper-list-error
    75     ##sys#hash-table-for-each
    76     ##sys#environment-symbols)
    77   (export
    78     make-environment
     35(module environments
     36
     37  ( make-environment
    7938    environment?
    8039    environment-copy
     
    8948    environment-remove!
    9049    environment-for-each
    91     environment-symbols) )
     50    environment-symbols)
     51
     52(import scheme chicken extras)
     53
     54(declare
     55  (usual-integrations)
     56  (disable-interrupts)
     57  (fixnum)
     58  (inline)
     59  (no-bound-checks)
     60  (no-procedure-checks))
     61
    9262
    9363;;;
     
    381351
    382352;;
     353)
  • release/4/environments/trunk/environments.setup

    r8918 r14717  
    1 (required-chicken-version 2.509)
     1;;;; -*- Hen -*-
    22
    3 (compile -s -O2 -d1
    4   -check-imports -emit-exports environments.exports
    5   environments.scm)
    6 (install-extension 'environments
    7   '("environments.so"
    8     "environments.html")
    9   '((version 1.52)
    10     (exports "environments.exports")
    11     (documentation "environments.html")))
     3(define (dynld-name fn)         
     4  (make-pathname #f fn ##sys#load-dynamic-extension))   
     5
     6(compile -O2 -d0 -s environments.scm -j environments)
     7(compile -O2 -d0 -s environments.import.scm)
     8
     9(install-extension
     10
     11  ; Name of your extension:
     12  'environments
     13
     14  ; Files to install for your extension:
     15  `(,(dynld-name "environments") ,(dynld-name "environments.import") )
     16
     17  ; Assoc list with properties for your extension:
     18  `((version 1.53)
     19    (documentation "environments.html")
     20    ))
     21
Note: See TracChangeset for help on using the changeset viewer.