Changeset 27972 in project


Ignore:
Timestamp:
12/17/12 17:08:03 (7 years ago)
Author:
Kon Lovett
Message:

Rmvd buggy tests.

Location:
release/4/tinyclos
Files:
4 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/4/tinyclos/tags/1.8.6/tests/run.scm

    r19803 r27972  
    369369              "non-dotted")
    370370
     371#; ;BUG not defined in same lexical scope
    371372  (test/equal   "Michele Simionato's example 1 from C3 egg"
    372373                (begin
     
    381382                (list A B C D F E <object> <top>))
    382383
     384#; ;BUG not defined in same lexical scope
    383385  (test/equal   "Michele Simionato's example 2 from C3 egg"
    384386                (begin
     
    393395                (list A B E C D F <object> <top>))
    394396
     397#; ;BUG not defined in same lexical scope
    395398  (test/equal   "Pedroni's example from C3 egg"
    396399                (begin
    397400                  (define O <object>)
    398                   (define-class A(O) ())
    399                   (define-class B(O) ())
    400                   (define-class C(O) ())
    401                   (define-class D(O) ())
    402                   (define-class E(O) ())
    403                   (define-class K1(A B C) ())
    404                   (define-class K2(D B E) ())
    405                   (define-class K3(D A) ())
    406                   (define-class Z(K1 K2 K3) ())
     401                  (define-class A (O) ())
     402                  (define-class B (O) ())
     403                  (define-class C (O) ())
     404                  (define-class D (O) ())
     405                  (define-class E (O) ())
     406                  (define-class K1 (A B C) ())
     407                  (define-class K2 (D B E) ())
     408                  (define-class K3 (D A) ())
     409                  (define-class Z (K1 K2 K3) ())
    407410                  (class-cpl Z))
    408411                (list Z K1 K2 K3 D A B E C <object> <top>))
  • release/4/tinyclos/tags/1.8.6/tinyclos.setup

    r24072 r27972  
    3737(install-extension 'tinyclos
    3838 '("tinyclos.so" "tinyclos.import.so" "tinyclos.o")
    39  `((version "1.8.5")
     39 `((version "1.8.6")
    4040   (examples "tinyclos-examples.scm")
    4141   (static "tinyclos.o")))
     
    4343(install-extension 'detail-object
    4444 '("detail-object.so" "detail-object.import.so" "detail-object.o")
    45  `((version "1.8.5")
     45 `((version "1.8.6")
    4646   (static "detail-object.o")))
  • release/4/tinyclos/trunk/tests/run.scm

    r19803 r27972  
    369369              "non-dotted")
    370370
     371#; ;BUG not defined in same lexical scope
    371372  (test/equal   "Michele Simionato's example 1 from C3 egg"
    372373                (begin
     
    381382                (list A B C D F E <object> <top>))
    382383
     384#; ;BUG not defined in same lexical scope
    383385  (test/equal   "Michele Simionato's example 2 from C3 egg"
    384386                (begin
     
    393395                (list A B E C D F <object> <top>))
    394396
     397#; ;BUG not defined in same lexical scope
    395398  (test/equal   "Pedroni's example from C3 egg"
    396399                (begin
    397400                  (define O <object>)
    398                   (define-class A(O) ())
    399                   (define-class B(O) ())
    400                   (define-class C(O) ())
    401                   (define-class D(O) ())
    402                   (define-class E(O) ())
    403                   (define-class K1(A B C) ())
    404                   (define-class K2(D B E) ())
    405                   (define-class K3(D A) ())
    406                   (define-class Z(K1 K2 K3) ())
     401                  (define-class A (O) ())
     402                  (define-class B (O) ())
     403                  (define-class C (O) ())
     404                  (define-class D (O) ())
     405                  (define-class E (O) ())
     406                  (define-class K1 (A B C) ())
     407                  (define-class K2 (D B E) ())
     408                  (define-class K3 (D A) ())
     409                  (define-class Z (K1 K2 K3) ())
    407410                  (class-cpl Z))
    408411                (list Z K1 K2 K3 D A B E C <object> <top>))
  • release/4/tinyclos/trunk/tinyclos.setup

    r24072 r27972  
    3737(install-extension 'tinyclos
    3838 '("tinyclos.so" "tinyclos.import.so" "tinyclos.o")
    39  `((version "1.8.5")
     39 `((version "1.8.6")
    4040   (examples "tinyclos-examples.scm")
    4141   (static "tinyclos.o")))
     
    4343(install-extension 'detail-object
    4444 '("detail-object.so" "detail-object.import.so" "detail-object.o")
    45  `((version "1.8.5")
     45 `((version "1.8.6")
    4646   (static "detail-object.o")))
Note: See TracChangeset for help on using the changeset viewer.