MCPcopy Create free account
hub / github.com/clMathLibraries/clBLAS / handleClearImaginary

Method handleClearImaginary

src/library/blas/gens/kprintf.cpp:1601–1624  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

1599}
1600
1601void kprintf::handleClearImaginary(char **_src, char **_dst)
1602{
1603 // %CLEAR_IMAGINARY( varName );
1604 // generates varName.odd = 0; incase of complex type
1605
1606 int numCharsWritten = 0;
1607 char id1[256];
1608 char * ptr;
1609 char *src = *_src;
1610 char *dst = *_dst;
1611
1612 ptr = mystrtok( src, "(,)");
1613 ptr = mystrtok( NULL, "(,)"); // Get first ID
1614 strcpy( id1, ptr);
1615 *_src = ptr + strlen(ptr) + 1;
1616
1617 if ( s_or_v == VECTOR)
1618 {
1619 numCharsWritten = sprintf(dst,"%s.odd = 0.0f", id1);
1620 dst += numCharsWritten;
1621 }
1622
1623 *_dst = dst;
1624}
1625
1626static const char * itoa(int n)
1627{

Callers

nothing calls this directly

Calls

no outgoing calls

Tested by

no test coverage detected