Changeset 7955 in project
- Timestamp:
- 01/27/08 08:58:57 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ode/trunk/ode.scm
r7954 r7955 526 526 ((list? x) 527 527 (begin 528 (print "isdep? x = " x)529 528 (alist-ref 'dep? (cdr x)))) 530 529 (else #f))) … … 585 584 (let* ((q (environment-ref ode-env qsym)) 586 585 (rhs (qrhs q))) 587 (print "q = " q)588 586 (if rhs 589 587 (let* ((deps (filter (if (isstate? q)
Note: See TracChangeset
for help on using the changeset viewer.