1*b1cdbd2cSJim Jagielski/************************************************************** 2*b1cdbd2cSJim Jagielski * 3*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one 4*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file 5*b1cdbd2cSJim Jagielski * distributed with this work for additional information 6*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file 7*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the 8*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance 9*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at 10*b1cdbd2cSJim Jagielski * 11*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0 12*b1cdbd2cSJim Jagielski * 13*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing, 14*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an 15*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the 17*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations 18*b1cdbd2cSJim Jagielski * under the License. 19*b1cdbd2cSJim Jagielski * 20*b1cdbd2cSJim Jagielski *************************************************************/ 21*b1cdbd2cSJim Jagielski/* os2 build scripts 22*b1cdbd2cSJim Jagielski 23*b1cdbd2cSJim Jagielskiwill return a 8.3 conformant name for modname. 24*b1cdbd2cSJim Jagielski 25*b1cdbd2cSJim Jagielski21/02/2006 Actually this is a simple truncation, seems nothing more needed. 26*b1cdbd2cSJim Jagielski 27*b1cdbd2cSJim Jagielski*/ 28*b1cdbd2cSJim Jagielski 29*b1cdbd2cSJim Jagielskiparse arg modname 30*b1cdbd2cSJim Jagielskiif pos('.',modname)>0 then modname = left(modname, pos('.',modname)-1) 31*b1cdbd2cSJim Jagielskisay strip(left(modname,8)) 32