Ignore:
Timestamp:
09/28/19 05:06:19 (16 months ago)
Author:
Kon Lovett
Message:

let the compiler do the work, reflow, add tests

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/5/coops-utils/trunk/tests/coops-utils-test.scm

    r37388 r37915  
    44(import test)
    55
    6 (test-begin "Coops Utils")
    7 
    8 ;;;
    9 
    106(import
    117  (chicken syntax)
    128  (srfi 1)
    139  (srfi 13)
    14   coops
    15   coops-utils)
     10  coops)
    1611
    17 ;;
     12;;;
     13
     14(import coops-utils)
     15
     16(test-begin "Coops Utils")
     17
     18;
    1819
    1920(test-assert (class? <standard-class>))
     
    163164|#
    164165
    165 ;;;
     166;
    166167
    167168(test-end "Coops Utils")
    168169
     170;;
     171
     172(import coops-describe)
     173
     174(test-begin "Coops Describe")
     175
     176(describe-object <third>)
     177(newline)
     178(describe-object s1xy-inst)
     179(newline)
     180(describe-object describe-object)
     181(newline)
     182(print-closure describe-object)
     183
     184(test-end "Coops Describe")
     185
     186;;
     187
     188(import coops-introspection)
     189
     190(test-begin "Coops Introspection")
     191
     192(generic-name describe-object)
     193
     194(test-end "Coops Introspection")
     195
     196;;;
     197
    169198(test-exit)
Note: See TracChangeset for help on using the changeset viewer.