Stats

  • Locked Locked
  • Replies 16
  • Subscribers 144
  • Views 19938
  • Members are here 0
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Alternative way of getting the column in a list

essej
I have a function that gets the columns in an assoc list. Its working fine except for the very large size of list around 10 million. I gets a huge memory allocated when I profiled it.

procedure(getColSub(col lList)
  if(onep(length(col)) then
    case(car(col)
      (0 mapcar('car lList))
      (1 mapcar('cadr lList))
      (2 mapcar('caddr lList))
      (3 mapcar('cadddr lList))
      (t mapcar('nth vectorToList(makeVector(length(lList) car(col))) lList))
    )
  else
    mapcar('nth col vectorToList(makeVector(length(col) lList)))
  )
)

Example:
lList=list(list("a" 1) list("b" 2))
col=list(1 0) , gives ((1 "a")(2 "b"))
col=list(1) , gives (1 2)
Parents
  • essej

    I always got warning that I am using bigger swap memory when running my script. I profiled it and gives me huge size on a list.

    I'm trying to improve every list manipulation so I can solve this issue.

    Snapshot

    Function Name                        Total   Inside
    -------------                        -----   ------
    TOTAL (Memory Allocated)           555464224  555464224 bytes
    toplevel                           555464224      912
    sgFldMacroEditGenerateMacro_CB     555437784        0
    sgAMacSkillCode                    418113912       72
    sgAMacExportToSkill                417927416       24
    sgAMacGetVar                       405785688     3000
    sgPMPropInfoRead                   367713440        0
    sgPMPropInfoList                   365481504        0
    list                               248371656  248371656
    sgPMPropRead                       228395024        0
    sgCompileAMacCode                  136996552        0
    load                               126692360     5616
    getSGq                             24713440  24713440
    parseString                        21260016  21260016
    sgSortPcellVarList                 12103016      136
    mapcan                             11564608        0
    sgPMCellSave                       11258952        0
    /* funobj@0x26d07868 */            11200992        0
    sgGetVar                           11200992        0
    sgPMCVSave                         10514840        0
    sgRunSkLint                        10241584        0
    tableToList                        9979200  9979200
    sklint                             9547536        0
    sklint1                            9540048     1872
    apply                              9540048        0
    /* funobj@0x1b250e30 */            8791984        0
    skLintFile                         8791984        0
    skCheckFile                        8747264     3120
    sgPMPropValueRead                  8658168        0
    sgPMObjectList                     8401528        0
    cons                               6906504  6906504
    vectorToList                       5282160  5282160
    dbSave                             5038352  1053696
    /* funobj@0x1b24b6b0 */            4957296        0
    lineread                           4957296        0
    skReadLine                         4957296        0
    linereadstring                     4808544        0

Reply
  • essej

    I always got warning that I am using bigger swap memory when running my script. I profiled it and gives me huge size on a list.

    I'm trying to improve every list manipulation so I can solve this issue.

    Snapshot

    Function Name                        Total   Inside
    -------------                        -----   ------
    TOTAL (Memory Allocated)           555464224  555464224 bytes
    toplevel                           555464224      912
    sgFldMacroEditGenerateMacro_CB     555437784        0
    sgAMacSkillCode                    418113912       72
    sgAMacExportToSkill                417927416       24
    sgAMacGetVar                       405785688     3000
    sgPMPropInfoRead                   367713440        0
    sgPMPropInfoList                   365481504        0
    list                               248371656  248371656
    sgPMPropRead                       228395024        0
    sgCompileAMacCode                  136996552        0
    load                               126692360     5616
    getSGq                             24713440  24713440
    parseString                        21260016  21260016
    sgSortPcellVarList                 12103016      136
    mapcan                             11564608        0
    sgPMCellSave                       11258952        0
    /* funobj@0x26d07868 */            11200992        0
    sgGetVar                           11200992        0
    sgPMCVSave                         10514840        0
    sgRunSkLint                        10241584        0
    tableToList                        9979200  9979200
    sklint                             9547536        0
    sklint1                            9540048     1872
    apply                              9540048        0
    /* funobj@0x1b250e30 */            8791984        0
    skLintFile                         8791984        0
    skCheckFile                        8747264     3120
    sgPMPropValueRead                  8658168        0
    sgPMObjectList                     8401528        0
    cons                               6906504  6906504
    vectorToList                       5282160  5282160
    dbSave                             5038352  1053696
    /* funobj@0x1b24b6b0 */            4957296        0
    lineread                           4957296        0
    skReadLine                         4957296        0
    linereadstring                     4808544        0

Children
No Data

Community Guidelines

The Cadence Design Communities support Cadence users and technologists interacting to exchange ideas, news, technical information, and best practices to solve problems and get the most from Cadence technology. The community is open to everyone, and to provide the most value, we require participants to follow our Community Guidelines that facilitate a quality exchange of ideas and information. By accessing, contributing, using or downloading any materials from the site, you agree to be bound by the full Community Guidelines.