1/* 2 * Copyright (c) 1980, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright --- 360 unchanged lines hidden (view full) --- 369 goto skip; 370 if (isproc(s)) { 371 ps("'FN "); 372 ps(pname); 373 ps("\n"); 374 if (psptr < PSMAX) { 375 ++psptr; 376 strncpy (pstack[psptr], pname, PNAMELEN); |
377 pstack[psptr][PNAMELEN] = '\0'; |
378 plstack[psptr] = blklevel; 379 } 380 } 381skip: 382 do { 383 /* check for string, comment, blockstart, etc */ 384 if (!incomm && !instr && !inchr) { 385 --- 339 unchanged lines hidden --- |