Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: open? opened? close? closed? for schemes and ports

From: greggirwin:mindspring at: 20-Aug-2002 10:28

Hi Norman, Paul Tretter came up with a way to see if a port is open I think. Paul, you around? As far as checking which words are ports (if I understand your request), you can iterate over the global words to find them, but that won't find them if they live inside a context. You can also find objects and iterate into them, but the best approach will depend on what you actually want to accomplish. Try: "help tuple!" at the console and you will see that it finds all the tuple! values. You can use SOURCE on HELP as well to see how it works. Here's a basic example: find-words: func [test-fn words /local result] [ result: make block! 50 foreach w words [ if test-fn try [get to-lit-word :w] [append result :w] ] sort result ] find-words :tuple? first system/words find-words :integer? first system/words find-words :object? first system/words HTH! --Gregg