--- freem/mlib/%ulstring.m 2025/01/19 02:04:04 1.1.1.1 +++ freem/mlib/%ulstring.m 2025/03/10 00:38:15 1.2 @@ -1,18 +1,53 @@ -%ulstring ; STRING library - version 0.5.0.1 - ; - ; Unless otherwise noted, the code below - ; was approved in document X11/95-11 - ; - ; If corrections have been applied, - ; first the original line appears, - ; with three semicolons at the beginning of the line. - ; - ; Then the source of the correction is acknowledged, - ; then the corrected line appears, followed by a - ; line containing three semicolons. - ; - ; - ; +%ulstring ;VCL/SNW-STRING LIBRARY; 03/09/25 06:30 PM + ;0.0;FreeM;****FREEM**;Serena Willis @2025 + ; + ; $Id: %ulstring.m,v 1.2 2025/03/10 00:38:15 snw Exp $ + ; String library + ; + ; + ; Author: Serena Willis + ; Copyright (C) 1998 MUG Deutschland + ; Copyright (C) 2023, 2025 Coherent Logic Development LLC + ; + ; + ; This file is part of FreeM. + ; + ; FreeM is free software: you can redistribute it and/or modify + ; it under the terms of the GNU Affero Public License as published by + ; the Free Software Foundation, either version 3 of the License, or + ; (at your option) any later version. + ; + ; FreeM is distributed in the hope that it will be useful, + ; but WITHOUT ANY WARRANTY; without even the implied warranty of + ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + ; GNU Affero Public License for more details. + ; + ; You should have received a copy of the GNU Affero Public License + ; along with FreeM. If not, see . + ; + ; $Log: %ulstring.m,v $ + ; Revision 1.2 2025/03/10 00:38:15 snw + ; Phase 3 of REUSE compliance and header reformatting + ; + ; + ; SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC + ; SPDX-License-Identifier: AGPL-3.0-or-later + ; + ; STRING library - version 0.5.0.1 + ; + ; Unless otherwise noted, the code below + ; was approved in document X11/95-11 + ; + ; If corrections have been applied, + ; first the original line appears, + ; with three semicolons at the beginning of the line. + ; + ; Then the source of the correction is acknowledged, + ; then the corrected line appears, followed by a + ; line containing three semicolons. + ; + ; + ; PRODUCE(IN,SPEC,MAX) ; NEW VALUE,AGAIN,P1,P2,I,COUNT SET VALUE=IN,COUNT=0