; set default library name if( (!boundp( 'admLibraryName )) then warn( "Setting the destination library to default value of ADM" ) admLibraryName = "ADM" ) ; set default library source path if( (!boundp( 'admLibraryPath )) then warn( "Setting the source code path to default value of ./ADM/" ) admLibraryPath = "./ADM/" ) ; write out source and destination warn( strcat( "Accessing source code from path: " admLibraryPath ) ) warn( strcat( "Installing pcells into library: " admLibraryName ) ) ; get list of pcells tmp = getDirFiles( admLibraryPath ) admLibrarySkill = list() ; apply filter while( car(tmp) tmp2 = car( tmp ) tmp = cdr( tmp ) cond( ((tmp2==".") nil) ((tmp2=="..") nil) ((tmp2=="install_pcells.il") nil) ((substring(tmp2 -3)==".il") (admLibrarySkill = cons(tmp2 admLibrarySkill) ) ) ) ) ; load skill files admLibrarySkill = reverse( admLibrarySkill ) foreach( tmp admLibrarySkill load( strcat( admLibraryPath tmp ) ) )