myjob1.cl

来自「Visual Prolog 7.1的一些学习资料,希望对您有用」· CL 代码 · 共 22 行

/*****************************************************************************

                        Copyright (c) Prolog Development Center A/S

******************************************************************************/

class myJob1 : bgJob
    open core

predicates
        classInfo : core::classInfo.
        % @short Class information  predicate.
        % @detail This predicate represents information predicate of this class.
        % @end

predicates
    myJob1 : (unsigned X, unsigned Y).

constructors
    new : (unsigned JobId, unsigned X, unsigned Y).

end class myJob1