home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l217 / 2.ddi / EXAMPLES / CH24EX01.PRO < prev    next >
Encoding:
Text File  |  1990-03-26  |  331 b   |  18 lines
  1. /*
  2.    Copyright (c) 1986, 90 by Prolog Development Center
  3. */
  4.    
  5. global predicates
  6.    message(string) - (i) language c
  7.    hello_c - language c
  8.  
  9. clauses
  10.    message(S) :- 
  11.       makewindow(13,7,7,"",10,10,3,50),
  12.       write(S), readchar(_),
  13.       removewindow.
  14.  
  15. goal
  16.    message("Hello from PDC Prolog"),
  17.    hello_c.
  18.