ORIGIN 'betaenv'; LIB_DEF 'mbs_version' '../lib'; (* * COPYRIGHT * Copyright (C) Mjolner Informatics, 1984-2004 * All rights reserved. *) -- LIB: attributes -- mbs_version: (* Defines the current version of the Mjolner BETA System * in various ways. Typical usage: * * (if (mbs_version).major >= 4 then * ... * if); *) (# major: (# exit 5 #); minor: (# exit 4 #); revision: (# exit 0 #); release: (# exit 050400 #); desc: (# exit '5.4' #); exit THIS(mbs_version)[] #)
13.11 Mbs_version Interface | © 1990-2004 Mjølner Informatics |
[Modified: Monday March 15th 2004 at 13:47]
|