# # This file is nendo's compiled library file. # generated “nendo -c src” command. #

trampCall(

 begin
   embedBacktraceInfo( "./lib/stowm/util.nnd", 3 );
     delayCall( '_require',  'require',
         begin
           if @global_lisp_binding.has_key?('_require') then
             trampCall(@_require)
           else raise NameError.new( "Error: undefined variable require", "require" ) end
           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:3"] + __e.backtrace ) ; raise __e
         end        ,
     [
         "digest/sha1"
     ]
                  )
 end
)

——————–

trampCall(

 begin #execFunc
     def self._stowm_MIMARKregex_MIMARKmatch_METHOD( origname, pred, args )   lispMethodEntry( origname, true ) ;   ret = callProcedure( '_stowm_MIMARKregex_MIMARKmatch', origname, pred, args ) ;  lispMethodExit( origname,  true ) ;   return ret end 
     @global_lisp_binding['_stowm_MIMARKregex_MIMARKmatch'] = self.method( :_stowm_MIMARKregex_MIMARKmatch_METHOD )
   @_stowm_MIMARKregex_MIMARKmatch = 
   trampCall(
         Proc.new { |_regex,_str| 
             begin #makeLet
               ___lambda = lambda { |_regex| 
                   begin #makeLet
                     ___lambda = lambda { |_matchdata| 
                         if ( 
                           begin
                               trampCall(_matchdata)
                             rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:12"] + __e.backtrace ) ; raise __e
                           end
                          ) then
                             begin
                                 trampCall(_matchdata).to_a.to_list(
                                   )
                               rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:13"] + __e.backtrace ) ; raise __e
                             end
                         else
                           false
                         end
                     } ; ___lambda.call(
                           begin
                             embedBacktraceInfo( "./lib/stowm/util.nnd", 11 );
                               trampCall( self._rxmatch_METHOD(  'rxmatch',
                                   begin
                                     if @global_lisp_binding.has_key?('_rxmatch') then
                                       trampCall(@_rxmatch)
                                     else raise NameError.new( "Error: undefined variable rxmatch", "rxmatch" ) end
                                     rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:11"] + __e.backtrace ) ; raise __e
                                   end                                  ,
                               [
                                     begin
                                         trampCall(_regex)
                                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:11"] + __e.backtrace ) ; raise __e
                                     end                                    ,
                                     begin
                                         trampCall(_str)
                                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:11"] + __e.backtrace ) ; raise __e
                                     end
                               ]
                                            ))
                           end
                                )
                   end
               } ; ___lambda.call(
                     if ( 
                       begin
                         embedBacktraceInfo( "./lib/stowm/util.nnd", 8 );
                           trampCall( self._regexp_QUMARK_METHOD(  'regexp?',
                               begin
                                 if @global_lisp_binding.has_key?('_regexp_QUMARK') then
                                   trampCall(@_regexp_QUMARK)
                                 else raise NameError.new( "Error: undefined variable regexp?", "regexp?" ) end
                                 rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:8"] + __e.backtrace ) ; raise __e
                               end                              ,
                           [
                                 begin
                                     trampCall(_regex)
                                   rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:8"] + __e.backtrace ) ; raise __e
                                 end
                           ]
                                        ))
                       end
                      ) then
                         begin
                             trampCall(_regex)
                           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:9"] + __e.backtrace ) ; raise __e
                         end
                     else
                         begin
                           embedBacktraceInfo( "./lib/stowm/util.nnd", 10 );
                             delayCall( '_string_MIMARK_GTMARKregexp',  'string->regexp',
                                 begin
                                   if @global_lisp_binding.has_key?('_string_MIMARK_GTMARKregexp') then
                                     trampCall(@_string_MIMARK_GTMARKregexp)
                                   else raise NameError.new( "Error: undefined variable string->regexp", "string->regexp" ) end
                                   rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:10"] + __e.backtrace ) ; raise __e
                                 end                                ,
                             [
                                   begin
                                       trampCall(_regex)
                                     rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:10"] + __e.backtrace ) ; raise __e
                                   end
                             ]
                                          )
                         end
                     end
                          )
             end
         }
   )
 end
)

——————–

trampCall(

begin #execFunc
    def self._stowm_MIMARKexec_MIMARKsh_METHOD( origname, pred, args )   lispMethodEntry( origname, true ) ;   ret = callProcedure( '_stowm_MIMARKexec_MIMARKsh', origname, pred, args ) ;  lispMethodExit( origname,  true ) ;   return ret end 
    @global_lisp_binding['_stowm_MIMARKexec_MIMARKsh'] = self.method( :_stowm_MIMARKexec_MIMARKsh_METHOD )
  @_stowm_MIMARKexec_MIMARKsh = 
  trampCall(
        Proc.new { |_script,*__rest__| _disp = __rest__[0] ;  
            begin #makeLet
              ___lambda = lambda { |_digest| 
                  begin #makeLet
                    ___lambda = lambda { |_tmpfile| 
                        begin
                          embedBacktraceInfo( "./lib/stowm/util.nnd", 20 );
                            trampCall( self._with_MIMARKopen_METHOD(  'with-open',
                                begin
                                  if @global_lisp_binding.has_key?('_with_MIMARKopen') then
                                    trampCall(@_with_MIMARKopen)
                                  else raise NameError.new( "Error: undefined variable with-open", "with-open" ) end
                                  rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:20"] + __e.backtrace ) ; raise __e
                                end                                ,
                            [
                                  begin
                                      trampCall(_tmpfile)
                                    rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:21"] + __e.backtrace ) ; raise __e
                                  end                                  ,
                                  Proc.new { |_f| 
                                      begin
                                          trampCall(_f).puts(
                                                begin
                                                    trampCall(_script)
                                                  rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:23"] + __e.backtrace ) ; raise __e
                                                end
                                            )
                                        rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:23"] + __e.backtrace ) ; raise __e
                                      end
                                  }                                  ,
                                "w"
                            ]
                                         ))
                        end
                        if ( 
                          begin
                            embedBacktraceInfo( "./lib/stowm/util.nnd", 25 );
                              _car(
                                  begin
                                      trampCall(_disp)
                                    rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:25"] + __e.backtrace ) ; raise __e
                                  end
                              )
                          end
                         ) then
                            begin
                              embedBacktraceInfo( "./lib/stowm/util.nnd", 25 );
                                trampCall( self._printf_METHOD(  'printf',
                                    begin
                                      if @global_lisp_binding.has_key?('_printf') then
                                        trampCall(@_printf)
                                      else raise NameError.new( "Error: undefined variable printf", "printf" ) end
                                      rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:25"] + __e.backtrace ) ; raise __e
                                    end                                    ,
                                [
                                    "---BEGIN---(%s)

“ ,

                                       begin
                                           trampCall(_tmpfile)
                                         rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:25"] + __e.backtrace ) ; raise __e
                                       end
                                 ]
                                              ))
                             end
                         end
                         begin
                             trampCall(Kernel).system(
                                   begin
                                     embedBacktraceInfo( "./lib/stowm/util.nnd", 26 );
                                       ( 
                                       "bash "                                        +
                                         begin
                                             trampCall(_tmpfile)
                                           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:26"] + __e.backtrace ) ; raise __e
                                         end
                                        ) 
                                   end
                               )
                           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:26"] + __e.backtrace ) ; raise __e
                         end
                         if ( 
                           begin
                             embedBacktraceInfo( "./lib/stowm/util.nnd", 27 );
                               _car(
                                   begin
                                       trampCall(_disp)
                                     rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:27"] + __e.backtrace ) ; raise __e
                                   end
                               )
                           end
                          ) then
                             begin
                               embedBacktraceInfo( "./lib/stowm/util.nnd", 27 );
                                 _print(
                                   "---END---"
                                 )
                             end
                         end
                         begin
                             trampCall(File).delete(
                                   begin
                                       trampCall(_tmpfile)
                                     rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:28"] + __e.backtrace ) ; raise __e
                                   end
                               )
                           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:28"] + __e.backtrace ) ; raise __e
                         end
                     } ; ___lambda.call(
                           begin
                             embedBacktraceInfo( "./lib/stowm/util.nnd", 19 );
                               trampCall( self._sprintf_METHOD(  'sprintf',
                                   begin
                                     if @global_lisp_binding.has_key?('_sprintf') then
                                       trampCall(@_sprintf)
                                     else raise NameError.new( "Error: undefined variable sprintf", "sprintf" ) end
                                     rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:19"] + __e.backtrace ) ; raise __e
                                   end                                  ,
                               [
                                   "/tmp/stowm_script.%s.sh"                                    ,
                                     begin
                                         trampCall(_digest)
                                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:19"] + __e.backtrace ) ; raise __e
                                     end
                               ]
                                            ))
                           end
                                )
                   end
               } ; ___lambda.call(
                     begin
                         trampCall(Digest::SHA1).hexdigest(
                               begin
                                   trampCall(_script)
                                 rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:18"] + __e.backtrace ) ; raise __e
                               end
                           )
                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:18"] + __e.backtrace ) ; raise __e
                     end
                          )
             end
         }
   )
 end
)

——————–

trampCall(

 begin #execFunc
     def self._stowm_MIMARKget_MIMARKdir_MIMARKentries_METHOD( origname, pred, args )   lispMethodEntry( origname, true ) ;   ret = callProcedure( '_stowm_MIMARKget_MIMARKdir_MIMARKentries', origname, pred, args ) ;  lispMethodExit( origname,  true ) ;   return ret end 
     @global_lisp_binding['_stowm_MIMARKget_MIMARKdir_MIMARKentries'] = self.method( :_stowm_MIMARKget_MIMARKdir_MIMARKentries_METHOD )
   @_stowm_MIMARKget_MIMARKdir_MIMARKentries = 
   trampCall(
         Proc.new { |_path| 
             begin
               embedBacktraceInfo( "./lib/stowm/util.nnd", 33 );
                 delayCall( '_filter',  'filter',
                     begin
                       if @global_lisp_binding.has_key?('_filter') then
                         trampCall(@_filter)
                       else raise NameError.new( "Error: undefined variable filter", "filter" ) end
                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:33"] + __e.backtrace ) ; raise __e
                     end                    ,
                 [
                       Proc.new { |_x| 
                           begin
                             embedBacktraceInfo( "./lib/stowm/util.nnd", 35 );
                               _not(
                                   begin #makeLet
                                     ___lambda = lambda { |___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30004| 
                                         if ( 
                                           begin
                                               trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30004)
                                             rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                           end
                                          ) then
                                             begin
                                                 trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30004)
                                               rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                             end
                                         else
                                             begin #makeLet
                                               ___lambda = lambda { |___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30005| 
                                                   if ( 
                                                     begin
                                                         trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30005)
                                                       rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                                     end
                                                    ) then
                                                       begin
                                                           trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30005)
                                                         rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                                       end
                                                   else
                                                       begin #makeLet
                                                         ___lambda = lambda { |___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30006| 
                                                             if ( 
                                                               begin
                                                                   trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30006)
                                                                 rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                                               end
                                                              ) then
                                                                 begin
                                                                     trampCall(___gensym__647e1909ee9b53b5ba1ef80b65074bbce8690d16_30006)
                                                                   rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
                                                                 end
                                                             else
                                                               false
                                                             end
                                                         } ; ___lambda.call(
                                                               begin
                                                                   trampCall(_x).match(
                                                                       "^[.]"
                                                                     )
                                                                 rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:37"] + __e.backtrace ) ; raise __e
                                                               end
                                                                    )
                                                       end
                                                   end
                                               } ; ___lambda.call(
                                                     begin
                                                         trampCall(_x).match(
                                                             "[/]?[.][.]$"
                                                           )
                                                       rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:36"] + __e.backtrace ) ; raise __e
                                                     end
                                                          )
                                             end
                                         end
                                     } ; ___lambda.call(
                                           begin
                                               trampCall(_x).match(
                                                   "[/]?[.]$"
                                                 )
                                             rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:35"] + __e.backtrace ) ; raise __e
                                           end
                                                )
                                   end
                               )
                           end
                       }                      ,
                       begin
                         embedBacktraceInfo( "./lib/stowm/util.nnd", 38 );
                           _to_MIMARKlist(
                               begin
                                   trampCall(Dir).entries(
                                         begin
                                             trampCall(_path)
                                           rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:38"] + __e.backtrace ) ; raise __e
                                         end
                                     )
                                 rescue => __e ; __e.set_backtrace( ["./lib/stowm/util.nnd:38"] + __e.backtrace ) ; raise __e
                               end
                           )
                       end
                 ]
                              )
             end
         }
   )
 end
)

# ——————————————————- # [EOF] # ——————————————————-