Re: [SOLVED] writing binary values (bytes) to a file

2008-11-19 Thread prhlava


Hello again,

Thank you all for the posts and explanations,

After getting the clojure SVN version and few tweaks in the code, the
working result looks like:

 (with-open [ofile (new java.io.FileOutputStream
(str result-directory
 /
 (make-filename x y))
(boolean true))] ; I am appending only
(. ofile write
  (into-array Byte/TYPE
  [(byte (bit-shift-right pix 16))
   (byte (bit-shift-right pix 8))
   (byte pix)])) ; the pix is of the 
Integer type

Vlad


--~--~-~--~~~---~--~~
You received this message because you are subscribed to the Google Groups 
Clojure group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~--~~~~--~~--~--~---



Re: [SOLVED] writing binary values (bytes) to a file

2008-11-19 Thread Stuart Halloway

Hi Mark,

The metadata points to the source:

user (meta #'with-open)
{:doc bindings = name init\n\n  Evaluates body in a try expression  
with name bound to the value of\n  init, and a finally clause that  
calls (.close name)., :ns #Namespace clojure.core, :arglists  
([bindings  body]), :file core.clj, :name with-open, :macro  
true, :line 1752}

If you look through the archive I believe somebody posted code that  
uses the metadata to locate the source and display it at the REPL.

Stu


 On Wed, Nov 19, 2008 at 2:45 PM, prhlava [EMAIL PROTECTED]  
 wrote:


 Hello again,

 Thank you all for the posts and explanations,

 After getting the clojure SVN version and few tweaks in the code, the
 working result looks like:

(with-open [ofile (new java.io.FileOutputStream
   (str result-directory
/
(make-filename x y))
   (boolean true))] ; I am  
 appending only
   (. ofile write
 (into-array Byte/TYPE
 [(byte (bit-shift-right pix  
 16))
  (byte (bit-shift-right pix  
 8))
  (byte pix)])) ; the pix is  
 of the Integer type

 It looks like with-open accepts any number of bindings. Does it just
 call close on the first one when the body finishes or on all of them?

 If I wanted to figure this out for myself, how would I find the source
 code for with-open?

 -- 
 R. Mark Volkmann
 Object Computing, Inc.

 


--~--~-~--~~~---~--~~
You received this message because you are subscribed to the Google Groups 
Clojure group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~--~~~~--~~--~--~---



Re: [SOLVED] writing binary values (bytes) to a file

2008-11-19 Thread Graham Fawcett

On Wed, Nov 19, 2008 at 4:49 PM, Mark Volkmann
[EMAIL PROTECTED] wrote:

 On Wed, Nov 19, 2008 at 2:45 PM, prhlava [EMAIL PROTECTED] wrote:


 Hello again,

 Thank you all for the posts and explanations,

 After getting the clojure SVN version and few tweaks in the code, the
 working result looks like:

 (with-open [ofile (new java.io.FileOutputStream
(str result-directory
 /
 (make-filename x y))
(boolean true))] ; I am appending only
(. ofile write
  (into-array Byte/TYPE
  [(byte (bit-shift-right pix 16))
   (byte (bit-shift-right pix 8))
   (byte pix)])) ; the pix is of the 
 Integer type

 It looks like with-open accepts any number of bindings. Does it just
 call close on the first one when the body finishes or on all of them?

 If I wanted to figure this out for myself, how would I find the source
 code for with-open?

Hi,

If you're using Slime in Emacs, type in the word with-open (or put
your cursor on it in a Clojure source file) and press M-. (alt-period
or Escape, period).

Best,
Graham

--~--~-~--~~~---~--~~
You received this message because you are subscribed to the Google Groups 
Clojure group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~--~~~~--~~--~--~---



Re: [SOLVED] writing binary values (bytes) to a file

2008-11-19 Thread Mark Volkmann

Thanks Stu! I wasn't aware of the meta function. That helps a lot!

I looked for occurrences of (meta  throughout the clojure and
clojure-contrib repositories, but I didn't find a function that prints
the code for a given function. That would be incredibly useful for
learning! Does anybody know what function does that and whether it is
part of clojure-contrib?

On Wed, Nov 19, 2008 at 4:09 PM, Stuart Halloway
[EMAIL PROTECTED] wrote:

 Hi Mark,

 The metadata points to the source:

 user (meta #'with-open)
 {:doc bindings = name init\n\n  Evaluates body in a try expression
 with name bound to the value of\n  init, and a finally clause that
 calls (.close name)., :ns #Namespace clojure.core, :arglists
 ([bindings  body]), :file core.clj, :name with-open, :macro
 true, :line 1752}

 If you look through the archive I believe somebody posted code that
 uses the metadata to locate the source and display it at the REPL.

 Stu


 On Wed, Nov 19, 2008 at 2:45 PM, prhlava [EMAIL PROTECTED]
 wrote:


 Hello again,

 Thank you all for the posts and explanations,

 After getting the clojure SVN version and few tweaks in the code, the
 working result looks like:

(with-open [ofile (new java.io.FileOutputStream
   (str result-directory
/
(make-filename x y))
   (boolean true))] ; I am
 appending only
   (. ofile write
 (into-array Byte/TYPE
 [(byte (bit-shift-right pix
 16))
  (byte (bit-shift-right pix
 8))
  (byte pix)])) ; the pix is
 of the Integer type

 It looks like with-open accepts any number of bindings. Does it just
 call close on the first one when the body finishes or on all of them?

 If I wanted to figure this out for myself, how would I find the source
 code for with-open?

 --
 R. Mark Volkmann
 Object Computing, Inc.

 


 




-- 
R. Mark Volkmann
Object Computing, Inc.

--~--~-~--~~~---~--~~
You received this message because you are subscribed to the Google Groups 
Clojure group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~--~~~~--~~--~--~---