TCLib.lib(FltToCh.obj) : 
error LNK2019: unresolved external symbol __dtoui3 referenced in function _FltToCh
Test1.exe : fatal error LNK1120: 1 unresolved externals

// cl Problem1.cpp
#include <windows.h>
#include <string.h>
#include <stdlib.h>
#include <memory.h>
#include <stdio.h>


size_t __cdecl FltToCh(char* p, double x, size_t iFldWthTChrs, int iDecPlaces, char cDecimalSeperator, bool blnRightJustified)
{
 bool blnPositive,blnAbsValLessThanOne;
 bool blnRoundUpSuccessful=false;
 bool blnNeedToRoundUp=false;
 int iRoundingDigitLocation;
 size_t n,i=0,k=0;
 char* p1;
 
 p1=(char*)malloc(32);
 if(!p1)
    return 0;
 memset(p1,0,32);
 p1[0]=32, p1[1]=32;
 p1=p1+2;
 if(x>=0.0L)
    blnPositive=true;
 else
 { 
    blnPositive=false;
    x=x*-1.0L;
 }
 if(x<1.00000000000000L)
    blnAbsValLessThanOne=true;
 else
    blnAbsValLessThanOne=false;
 n=(size_t)x;
 while(n>0)
 {
   x=x/10;
   n=(size_t)x;
   i++;
 }
 *(p1+i) = cDecimalSeperator;
 x=x*10;
 n = (size_t)x;
 x = x-n;
 while(k<=17)
 {
   if(k == i)
      k++;
   *(p1+k)=48+(char)n;
   x=x*10;
   n = (size_t)x;
   x = x-n;
   k++;
 }
 *(p1+k) = '\0';
 iRoundingDigitLocation=(int)i+iDecPlaces+1;
 if(p1[iRoundingDigitLocation]>53)
    blnNeedToRoundUp=true;
 else
 {
    if(p1[iRoundingDigitLocation]==53  && p1[iRoundingDigitLocation-1] % 2)
       blnNeedToRoundUp=true;
 }
 p1[iRoundingDigitLocation]=0;
 if(blnNeedToRoundUp)
 { 
    int iStart=iRoundingDigitLocation-1;
    for(int h=iStart; h>=0; h--)
    {
        if(h==i)
           continue;
        else
        {
           if(p1[h]!=57 && p1[h]!=cDecimalSeperator)
           {
              p1[h]=p1[h]+1;
              blnRoundUpSuccessful=true;
              break;
           }
           else
              p1[h]=48;
        }
    }
 }
 if(blnPositive)
 {
    if(blnRoundUpSuccessful==false && blnNeedToRoundUp==true)
    { 
       p1[-1]=49;
       if(blnAbsValLessThanOne)
          blnAbsValLessThanOne=false;
    }   
    if(iDecPlaces==0)
       p1[i]='\0';     
    if(blnAbsValLessThanOne)
       p1[-1]=48;
 }
 else
 {
    if(blnRoundUpSuccessful==false && blnNeedToRoundUp==true)
    {
       p1[-1]=49;
       p1[-2]='-';
       if(blnAbsValLessThanOne)
          blnAbsValLessThanOne=false;
    }   
    if(iDecPlaces==0)
       p1[i]=0;     
    if(blnAbsValLessThanOne)
    {
       p1[-1]=48;
       p1[-2]='-';
    }
    else
    {
       if(p1[-1]==32)     
          p1[-1]='-';
    }       
 }
 
 int iSpaces=0;
 p1=p1-2;
 for(int i=0; i<18; i++)
 {
     if(p1[i]==32)
        iSpaces++;
 } 
 for(int i=0; i<18; i++) 
     p1[i]=p1[i+iSpaces];
 size_t iLen=strlen(p1);
 if(iLen>(iFldWthTChrs-1))
 {
	   memset(p,'F',iFldWthTChrs-1);
    p[iFldWthTChrs-1]=0;
    free(p1);
    return 0;
 }   
 char* pField=(char*)malloc(iFldWthTChrs);
 if(!pField)
 {
    free(p1);
    return 0;
 }
 size_t iDiff = iFldWthTChrs - iLen -1;
 if(blnRightJustified)
 {
    for(size_t i=0; i<iDiff; i++)
        pField[i]=32;
    pField[iDiff]=0;  
    strcat(pField,p1);
 }
 else
 {
    strcpy(pField,p1);
	   memset(pField+iLen,' ',iDiff);
    pField[iFldWthTChrs-1]=0;
 }
 strcpy(p,pField);
 free(p1);
 free(pField);
 
 return iFldWthTChrs-1;
}

int main()
{
 char szBuffer[16];
 double dblNumber;
 size_t iLen=0;
 
 memset(szBuffer, 0, 16);
 dblNumber=999.9999999;
 iLen=FltToCh(szBuffer, dblNumber, 16, 2, '.', false);
 printf("iLen     = %u\n",iLen);
 printf("szBuffer = %s\n",szBuffer);
 getchar();
 
 return 0;
}

C:\Code\VStudio\VC15\LibCTiny\x86\Test2>cl Problem1.cpp
Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x86
Copyright (C) Microsoft Corporation.  All rights reserved.

Problem1.cpp
Microsoft (R) Incremental Linker Version 14.00.23506.0
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:Problem1.exe
Problem1.obj

C:\Code\VStudio\VC15\LibCTiny\x86\Test2>problem1
iLen     = 15
szBuffer = 1000.00

crt_con_a.obj          // start up code for console mode asci app
crt_con_w.obj          // start up code for console mode wide app
crt_win_a.obj          // start up code for windows gui asci app
crt_win_w.obj          // start up code for windows gui wide app
memset.obj
newdel.obj
printf.obj
sprintf.obj
_strnicmp.obj
strncpy.obj
strncmp.obj
_strrev.obj
strcat.obj
strcmp.obj
strcpy.obj
strlen.obj
getchar.obj
alloc.obj
alloc2.obj
allocsup.obj
FltToCh.obj           // my floating point to asci/Unicode characters
atol.obj
_atoi64.obj
abs.obj
win32_crt_math.obj    // molinkos code

// cl Test1.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib               // doesn't work
// cl Test1.cpp /O1 /Os /GS- /link TCLib.lib kernel32.lib                                 // doesn't work
// cl Test1.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib FltToCh.obj kernel32.lib   // doesn't work
// 5,632 bytes with TCLib.lib  22 times smaller than with C Std. Lib.
//#define  UNICODE
//#define  _UNICODE
#include <windows.h>
#include "stdio.h"
#include "tchar.h"
extern "C" int _fltused=1;

int _tmain()
{
 TCHAR szBuffer[16];
 double dblNumber;
 
 dblNumber=999.9999999;
 FltToTChar(szBuffer, dblNumber, 12, 2, _T('.'),false);
 _tprintf(_T("%s\n"),szBuffer);
 getchar();

 return 0;
}

C:\Code\VStudio\VC15\LibCTiny\x86\Test2>cl Test1.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib
Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x86
Copyright (C) Microsoft Corporation.  All rights reserved.

Test1.cpp
Microsoft (R) Incremental Linker Version 14.00.23506.0
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:Test1.exe
TCLib.lib
kernel32.lib
Test1.obj
TCLib.lib(FltToCh.obj) : error LNK2019: unresolved external symbol __dtoui3 referenced in function _FltToCh
Test1.exe : fatal error LNK1120: 1 unresolved externals

size_t n;
double x;
n=(size_t)x;

size_t n;
double x;
n=(size_t)x;

unsigned int DoubleToU32(double x)
{
    unsigned int r;
    ...
    return r;
}

size_t n;
double x;
n=DoubleToU32(x);

unsigned int _dtoui3(double x) { ... }

unsigned int DoubleToU32(double x)
{
    return (unsigned int)_mm_cvtsd_si32(_mm_set_sd(x));
}

unsigned int DoubleToU32(double x)
{
    if (x >= double(2^31))
    {
        return 2^31 + _mm_cvtsd_si32(x - double(2^31));
    }
    return _mm_cvtsd_si32(x);
}

unsigned int DoubleToU32(double x)
{
 return (unsigned int)_mm_cvtsd_si32(_mm_set_sd(x));
} 

"Zero, One, Two, Three, Four, Five, Six";

// cl StdLibParse.cpp /O1 /Os /MT /EHsc
// 200,192 Bytes
#include <iostream>
#include <sstream>

int main()
{
 std::string input = "Zero, One, Two, Three, Four, Five, Six";
 std::istringstream ss(input);
 std::string token;
 while(std::getline(ss, token, ',')) 
 {
    std::cout << token << '\n';
 }
  
 return 0;
} 


#if 0

Output:
=======
Zero
 One
 Two
 Three
 Four
 Five
 Six

 #endif

//           TCLib.mak
PROJ       = TCLib

OBJS       = crt_con_a.obj crt_con_w.obj crt_win_a.obj crt_win_w.obj memset.obj newdel.obj printf.obj \
             sprintf.obj _strnicmp.obj strncpy.obj strncmp.obj _strrev.obj strcat.obj strcmp.obj \
             strcpy.obj strlen.obj getchar.obj alloc.obj alloc2.obj allocsup.obj FltToCh.obj atol.obj \
             _atoi64.obj abs.obj
        
CC         = CL
CC_OPTIONS = /D "_CRT_SECURE_NO_WARNINGS" /O1 /Os /GS- /c /W3 /DWIN32_LEAN_AND_MEAN

$(PROJ).LIB: $(OBJS)
    LIB /NODEFAULTLIB /machine:x64 /OUT:$(PROJ).LIB $(OBJS)

.CPP.OBJ:
    $(CC) $(CC_OPTIONS) $<

// cl Parse.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib
// 3,584 Bytes
#include <windows.h>
#include "stdlib.h"
#include "stdio.h"

class String
{
 public:
 String()   // Uninitialized Constructor
 {
  this->lpBuffer    = new char[16];
  this->lpBuffer[0] = 0;
  this->iLen        = 0;
  this->iCapacity   = 15;
 }
  
 String(const char* pStr)  //Constructor: Initializes with char*
 {
  this->iLen=strlen(pStr);
  int iNewSize=(this->iLen/16+1)*16;
  this->lpBuffer=new char[iNewSize];
  this->iCapacity=iNewSize-1;
  strcpy(lpBuffer,pStr);
 }

 String& operator=(const char* pStr)  // Assign char* To String
 {
  size_t iNewLen=strlen(pStr);
  if(iNewLen>this->iCapacity)
  {
     delete [] this->lpBuffer;
     int iNewSize=(iNewLen*2/16+1)*16;
     this->lpBuffer=new char[iNewSize];
     this->iCapacity=iNewSize-1;
  }
  strcpy(this->lpBuffer,pStr);
  this->iLen=iNewLen;
    
  return *this;
 }
  
 int ParseCount(const wchar_t c)   //returns one more than # of
 {                                 //delimiters so it accurately
  int iCtr=0;                      //reflects # of strings delimited
  char* p;                         //by delimiter.

  p=this->lpBuffer;
  while(*p)
  {
    if(*p==c)
       iCtr++;
    p++;
  }

  return ++iCtr;
 }
 
 void Parse(String* pStr, char delimiter, size_t iParseCount)
 {
  char* pBuffer=new char[this->iLen+1];  
  if(pBuffer)
  {
     char* p=pBuffer;
     char* c=this->lpBuffer;
     while(*c)
     {
        if(*c==delimiter)
           *p=0;
        else
           *p=*c;
        p++, c++;
     }
     *p=0, p=pBuffer;
     for(size_t i=0; i<iParseCount; i++)
     {
         pStr[i]=p;
         p=p+pStr[i].iLen+1;
     }
     delete [] pBuffer;
  }
 }
   
 char* lpStr()
 {
  return this->lpBuffer;
 } 
 
 void Print(bool blnCrLf)
 {
  printf("%s",lpBuffer);
  if(blnCrLf)
     printf("\n");
 }
   
 ~String()
 {
  delete [] this->lpBuffer;
 } 
  
 private:
 char*  lpBuffer;
 size_t iLen;
 size_t iCapacity; 
};


int main()
{
 String s1       = "Zero, One, Two, Three, Four, Five, Six";  // Assign CSV String To Be Parsed
 int iParseCount = s1.ParseCount(',');                        // Determine Number Of CSVs
 String* pStrs   = new String[iParseCount];                   // Allocate Array To Hold Above Determined Number of CSVs
 s1.Parse(pStrs, ',', iParseCount);                           // Parse The String
 for(int i=0; i<iParseCount; i++)                             // Output The CSVs
     pStrs[i].Print(true);                                    // ....
 delete [] pStrs;                                             // De-Allocate Dynamic Memory
 
 return 0;
}

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>cl Parse.cpp /O1 /Os /GS- /Zc:sizedDealloc- /link TCLib.lib kernel32.lib
Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
Copyright (C) Microsoft Corporation.  All rights reserved.

Parse.cpp
Microsoft (R) Incremental Linker Version 14.00.23506.0
Copyright (C) Microsoft Corporation.  All rights reserved.

/out:Parse.exe
TCLib.lib
kernel32.lib
Parse.obj

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>Parse
Zero
 One
 Two
 Three
 Four
 Five
 Six

C:\Code\VStudio\VC15\LibCTiny\x64\Test14>

#Compile Exe                                          ‘Create Stand Alone Exe as opposed to Dll or Lib
#Dim All                                              ‘Require All Variables To Be Declared

Function PBMain() As Long
  Local iParseCount As Long                           ‘To Contain Number Of CSVs
  Local strLine As Wstring                            ‘A OLE String Engine BSTR To Hold CSVs
  Local pStrs() As Wstring                            ‘A Dynamic Array Of COM BSTRs
  Register i As Long                                  ‘Use Register For Iterator

  strLine="Zero, One, Two, Three, Four, Five, Six"    ‘BSTR Containing CSVs
  iParseCount=ParseCount(strLine,",")                 ‘ParseCount() Returns # of CSVs
  Redim pStrs(iParseCount) As Wstring                 ‘Dynamically Allocate iParseCount # of BSTRs
  Parse strLine, pStrs(), ","                         ‘Parse CSVs Based On ‘,’; Put CSVs Into pStrs()’s Array
  For i=0 To UBound(pStrs, 1) –1                      ‘Iterate Through Array pStrs()
    Console.Print LTrim$(pStrs(i))                    ‘Output Trimmed Strings To Console
  Next i
  Erase pStrs()                                       ‘Release Dynamically Acquired Memory
  Waitkey$

  PBMain=0
End Function

#if 0
Zero
One
Two
Three
Four
Five
Six
#EndIf

// cl Form1.cpp /O1 /Os /GS- /link TCLib.lib kernel32.lib user32.lib
// cl Form1.cpp /O1 /Os /GS- /link kernel32.lib user32.lib gdi32.lib
#define UNICODE        //  3,072 Bytes x64 UNICODE or ASCI With LibCTiny.lib
#define _UNICODE       // 84,992 Bytes With C Standard Library Loaded (LIBCMT.LIB)
#include <windows.h>
#include "tchar.h"

LRESULT CALLBACK fnWndProc(HWND hwnd, unsigned int msg, WPARAM wParam, LPARAM lParam)
{
 if(msg==WM_DESTROY)
 {
    PostQuitMessage(0);
    return 0;
 }

 return (DefWindowProc(hwnd, msg, wParam, lParam));
}

int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE hPrevIns, LPTSTR lpszArgument, int iShow)
{
 WNDCLASSEX wc={0};
 MSG messages;
 HWND hWnd;

 wc.lpszClassName = _T("Form1");
 wc.lpfnWndProc   = fnWndProc;
 wc.cbSize        = sizeof(WNDCLASSEX);
 wc.hInstance     = hInstance;
 wc.hbrBackground = (HBRUSH)COLOR_BTNSHADOW;
 RegisterClassEx(&wc);
 hWnd=CreateWindowEx(0,_T("Form1"),_T("Form1"),WS_OVERLAPPEDWINDOW|WS_VISIBLE,200,100,325,300,HWND_DESKTOP,0,hInstance,0);
 while(GetMessage(&messages,NULL,0,0))
 {
    TranslateMessage(&messages);
    DispatchMessage(&messages);
 }

 return messages.wParam;
}

'PowerBASIC Version Form1  Disk Image 6656 bytes;  size on disk 8192; Windows Explorer 7K
#Compile Exe
#Dim     All
#Include Once "Win32Api.inc"


Function fnWndProc(ByVal hWnd As Long, ByVal msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
  If msg=%WM_DESTROY Then
     Call PostQuitMessage(0)
     fnWndProc=0 : Exit Function
  End If
  fnWndProc=DefWindowProc(hWnd, msg, wParam, lParam)
End Function


Function WinMain(ByVal hInstance As Long, ByVal hPrevIns As Long, ByVal lpszArgument As Asciiz Ptr, ByVal iShow As Long) As Long
  Local szClassName As Asciiz*8
  Local wc As WNDCLASSEX
  Local Msg As tagMsg
  Local hWnd As Dword

  szClassName             = "Form1"
  wc.lpszClassName        = VarPtr(szClassName)
  wc.lpfnWndProc          = CodePtr(fnWndProc)
  wc.cbSize               = SizeOf(wc)
  wc.hbrBackground        = %COLOR_BTNSHADOW
  wc.hInstance            = hInstance
  RegisterClassEx(wc)
  hWnd=CreateWindowEx(0,szClassName,szClassName,%WS_OVERLAPPEDWINDOW,200,175,320,300,%HWND_DESKTOP,0,hInstance,ByVal 0)
  ShowWindow(hWnd,iShow)
  While GetMessage(Msg,%NULL,0,0)
    TranslateMessage(Msg)
    DispatchMessage(Msg)
  Wend

  WinMain=msg.wParam
End Function