Print Page - Need a peek for WINDOWS

Title: Need a peek for WINDOWS
Post by: IVShilov on September 13, 2021, 08:26:43 AM

Hello.

It was big PITA when I found that win-version of newlisp have no peek.

But I found a workaround (http://www.newlispfanclub.alh.net/forum/viewtopic.php?f=9&t=5139) :

Code Select Expand
(define (peek-pipe fd)
  (letn (pos (seek fd)
	     size (seek fd -1))
    (seek fd pos)
    size
    ))

May be it's better place for posting that.

newLISP Fan Club

Forum => Anything else we might add? => Topic started by: IVShilov on September 13, 2021, 08:26:43 AM