home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / lang / pascal / 4984 < prev    next >
Encoding:
Text File  |  1992-08-22  |  1.5 KB  |  61 lines
  1. Newsgroups: comp.lang.pascal
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!menudo.uh.edu!cl2.cl.uh.edu!csci11ba
  3. From: csci11ba@cl2.cl.uh.edu (451924952 NEWMAN, DANA FRANK)
  4. Subject: Re: reHASHing of Reserved Words
  5. Message-ID: <22AUG199211034860@cl2.cl.uh.edu>
  6. News-Software: VAX/VMS VNEWS 1.4-b1  
  7. Sender: usenet@menudo.uh.edu (USENET News System)
  8. Nntp-Posting-Host: uhcl2.cl.uh.edu
  9. Reply-To: CSCI11BA@cl.uh.edu
  10. Organization: University of Houston - Clear Lake
  11. References: <2459.2a93e386@vger.nsu.edu>
  12. Date: Sat, 22 Aug 1992 17:03:00 GMT
  13. Lines: 46
  14.  
  15. In article <2459.2a93e386@vger.nsu.edu>, g_harrison@vger.nsu.edu (George C. Harrison, Norfolk State University) writes...
  16. >I posted this about 10 days ago and had only ONE reply (which I appreciate but
  17. >was incorrect).  I am SURE that someone in the Pasqual world knows the answer:
  18. > 
  19. >I want a perfect hash function for strings of Pascal reserved words.  A perfect
  20. >has function is a "simple function" normally using mod, div, length of string,
  21. >and Ord of some of the characters.  I want such a function to map directly from
  22. >the 36 Pascal reserved words onto the numbers 0 .. 35 WITHOUT COLLISION.
  23. > 
  24. >George
  25. > 
  26. >George C. Harrison, Prof. of CS, Norfolk State University
  27. >g_harrison@vger.nsu.edu
  28. > 
  29.  
  30. Hash value (address) = Key length + Value(first char) + value(last char)
  31. where the table value is given by:
  32. A=11
  33. B=15
  34. C=1
  35. D=0
  36. E=0
  37. F=15
  38. G=3
  39. H=15
  40. I=13
  41. J=0
  42. K=0
  43. L=15
  44. M=15
  45. N=13
  46. O=0
  47. P=15
  48. Q=0
  49. R=14
  50. S=6
  51. T=6
  52. U=14
  53. V=10
  54. W=6
  55. X=0
  56. Y=13
  57. Z=0
  58.  
  59. EXAMPLE: 'TO' = 2+6+0 = 8
  60.  
  61.