Experimental Physics and
Industrial Control System

Andrew Johnson via Core-talk <core-talk at aps.anl.gov> · Fri, 04 Nov 2022 16:17:00 -0000

I agree with your assessment and solution. Fixed on the 7.0 branch,
including test changes, in commit
cbd86ada20cedbff5f45fe8decb3b7b7da71ef0f

Thanks!

** Changed in: epics-base
     Assignee: (unassigned) => Andrew Johnson (anj)

** Also affects: epics-base/7.0
   Importance: Undecided
     Assignee: Andrew Johnson (anj)
       Status: New

** Changed in: epics-base/7.0
       Status: New => Fix Committed

-- 
You received this bug notification because you are a member of EPICS
Core Developers, which is subscribed to EPICS Base.
Matching subscriptions: epics-core-list-subscription
https://bugs.launchpad.net/bugs/1995728

Title:
  registerRecordDeviceDriver.pl bug

Status in EPICS Base:
  Fix Committed
Status in EPICS Base 7.0 series:
  Fix Committed

Bug description:
  In EPICS 7, when processing a dbd file with a long function name (> 24
  chars), registerRecordDeviceDriver.pl generates buggy output.

  With the following file test.dbd:
  function(abcdefghijklmnopqrstuvwxyz0123456789)

  The command perl registerRecordDeviceDriver.pl test.dbd generates code with a line break in the middle of a variable name:
  epicsShareExtern reg_func pvar_func_register_func_abcdefghijklmnopqrstuvwx
      yz0123456789;

  I suspect the error is in line 191 caused by the usage of wrap().

  I have tested this with perl v5.16.3 and v5.26.3.

To manage notifications about this bug go to:
https://bugs.launchpad.net/epics-base/+bug/1995728/+subscriptions

Experimental Physics and Industrial Control System

Experimental Physics and
Industrial Control System