newlispfanclub.alh.net

Code: Select all

#include <stdio.h>

int main ()
{
  char str [80];

    while(1)
    {
        fgets(str, 80, stdin);
        printf("%s",str);
    }

  return 0;
}

Code: Select all

;; Linux/Unix
(map set '(myin bcout) (pipe))
(map set '(bcin myout) (pipe))

;; launch Unix 'bc' calculator application
(setq pid (process "./a.out" bcin bcout) )

(println pid)

(write myout "hello\n")  ; bc expects a line-feed

(setq ret  (read-line myin)  )

(print ret)
;; destroy the process
(destroy pid)

Code: Select all

#include <stdio.h>

int main ()
{
  char str [80];

    while(1)
    {
        fgets(str, 80, stdin);
        fprintf(stdout,"%s",str);
        fflush(stdout);
    }

  return 0;
}