diff initm @ 10:f2aa38ce0787

add state display.
author kono
date Fri, 19 Jan 2001 23:14:00 +0900
parents 1c57a78f1d98
children
line wrap: on
line diff
--- a/initm	Fri Jan 19 20:37:32 2001 +0900
+++ b/initm	Fri Jan 19 23:14:00 2001 +0900
@@ -7,6 +7,10 @@
 % ?-op(60,fy,['~','#','<>', '@',^]).
 % ?-op(60,fy,[*]).
 
+:- use_module(library(system)).
+
+unix(system(X)) :- system(X).
+
 :-lite:[op].
 
 :-