Changeset 27369 in project
- Timestamp:
- 09/03/12 07:42:16 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
release/4/nemo/trunk/nemo-nmodl.scm
r27368 r27369 931 931 (sptms (map (lambda (st pwr) (if pwr `(pow ,st ,pwr) st)) sts pwrs)) 932 932 (gion `(* ,gmax ,@sptms))) 933 934 933 (list i e gion (nmodl-name (s+ 'i_ label))))))) 935 934 … … 938 937 ((non-specific) 939 938 (let* ((i (nmodl-name 'i)) 940 (e (nmodl-name (s+ 'e (cn perm))))939 (e (nmodl-name 'e)) 941 940 (gmax (car ((dis 'component-exports) sys (cid pore))))) 942 941 (list i e gmax (nmodl-name (s+ 'i_ label))))) … … 1085 1084 (case (cn perm) 1086 1085 ((non-specific) 1087 (let* ((e (nmodl-name 'e)) 1088 (elocal (car permqs))) 1089 (if (not (equal? e elocal)) 1090 (pp indent+ ,(expr->string/NMODL (nmodl-name elocal) e))))) 1091 1086 (begin)) 1087 1092 1088 (else 1093 1089 (let* ((e (nmodl-name (s+ 'e (cn perm))))
Note: See TracChangeset
for help on using the changeset viewer.