1: %OBJECT(THIS) ;VCL/SNW-OBJECT TYPE DEFINITION; 03/09/25
2: ;0.0;FreeM;****FREEM**;Serena Willis @2025
3: ;
4: ; $Id: %OBJECT.m,v 1.2 2025/03/10 00:38:15 snw Exp $
5: ; Object type definition
6: ;
7: ;
8: ; Author: Serena Willis <snw@coherent-logic.com>
9: ; Copyright (C) 1998 MUG Deutschland
10: ; Copyright (C) 2023, 2025 Coherent Logic Development LLC
11: ;
12: ;
13: ; This file is part of FreeM.
14: ;
15: ; FreeM is free software: you can redistribute it and/or modify
16: ; it under the terms of the GNU Affero Public License as published by
17: ; the Free Software Foundation, either version 3 of the License, or
18: ; (at your option) any later version.
19: ;
20: ; FreeM is distributed in the hope that it will be useful,
21: ; but WITHOUT ANY WARRANTY; without even the implied warranty of
22: ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23: ; GNU Affero Public License for more details.
24: ;
25: ; You should have received a copy of the GNU Affero Public License
26: ; along with FreeM. If not, see <https://www.gnu.org/licenses/>.
27: ;
28: ; $Log: %OBJECT.m,v $
29: ; Revision 1.2 2025/03/10 00:38:15 snw
30: ; Phase 3 of REUSE compliance and header reformatting
31: ;
32: ;
33: ; SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC
34: ; SPDX-License-Identifier: AGPL-3.0-or-later
35: QUIT
36: TONUMBER(THIS) Q +THIS
37: ToNumber(THIS) Q +THIS
38: toNumber(THIS) Q +THIS
39: TYPE(THIS) Q $TYPE($NAME(THIS))
40: Type(THIS) Q $TYPE($NAME(THIS))
41: type(THIS) Q $TYPE($NAME(THIS))
42: VALUE(THIS) Q THIS
43: Value(THIS) Q THIS
44: value(THIS) Q THIS
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>