Changeset 35003 in project


Ignore:
Timestamp:
01/11/18 06:12:31 (5 days ago)
Author:
kon
Message:

who cares

Location:
release/4/thread-utils/trunk
Files:
2 edited
1 moved

Legend:

Unmodified
Added
Removed
  • release/4/thread-utils/trunk/tests/run.scm

    r35001 r35003  
     1
     2(define EGG-NAME "thread-utils")
    13
    24;chicken-install invokes as "<csi> -s run.scm <eggnam> <eggdir>"
    3 
    4 (define *egg-name* "thread-utils")
    55
    66(use files)
     
    1111(define *args* (argv))
    1212
    13 (define (test-name #!optional (eggnam *egg-name*))
     13(define (test-name #!optional (eggnam EGG-NAME))
    1414  (string-append eggnam "-test") )
    1515
    16 (define (egg-name #!optional (def *egg-name*))
     16(define (egg-name #!optional (def EGG-NAME))
    1717  (cond
    1818    ((<= 4 (length *args*))
     
    2525;;;
    2626
    27 (set! *egg-name* (egg-name))
     27(set! EGG-NAME (egg-name))
    2828
    29 (define (run-test #!optional (eggnam *egg-name*) (cscopts *csc-options*))
     29(define (run-test #!optional (eggnam EGG-NAME) (cscopts *csc-options*))
    3030  (let ((tstnam (test-name eggnam)))
    3131    (print "*** csi ***")
     
    4141;;;
    4242
    43 (run-tests '("thread-utils" "atomic-value"))
     43(run-test)
     44
     45(run-test "atomic-value")
  • release/4/thread-utils/trunk/thread-object-primitive.scm

    r35002 r35003  
    1 ;;;; chicken-thread-object-primitive-inlines.scm
     1;;;; thread-object-primitive.scm
     2;;;; Kon Lovett, Jan '17
    23;;;; Kon Lovett, Jan '09
    34
    45; Usage
    56;
    6 ; (include "chicken-primitive-object-inlines")
    7 ; (include "chicken-thread-object-inlines")
     7; (include "thread-object-primitive")
    88
    99;; Notes
  • release/4/thread-utils/trunk/thread-utils.meta

    r34995 r35003  
    88 (synopsis "Thread Utilities")
    99 (depends
     10        (setup-helper "1.5.2")
    1011        (check-errors "1.12.2")
    1112  (record-variants "0.5")
    1213  (miscmacros "2.96")
    1314  (dsssl-utils "2.1.0")
    14         (synch "2.1.0")
    15         (setup-helper "1.5.2"))
     15        (synch "2.1.0"))
    1616 (test-depends test)
    1717 (files
Note: See TracChangeset for help on using the changeset viewer.