11import sublime
22import sublime_plugin
33
4- import os
5-
6- intrinsics = {k :k + ".html" for k in [
4+ intrinsics = [
75"ABORT" , "ABS" , "ACCESS" , "ACHAR" , "ACOS" , "ACOSH" , "ADJUSTL" , "ADJUSTR" , "AIMAG" , "AINT" , "ALARM" , "ALL" , "ALLOCATED" , "AND" , "ANINT" , "ANY" , "ASIN" , "ASINH" , "ASSOCIATED" , "ATAN" , "ATAN2" ,
86"ATANH" , "ATOMIC_ADD" , "ATOMIC_AND" , "ATOMIC_CAS" , "ATOMIC_DEFINE" , "ATOMIC_FETCH_ADD" , "ATOMIC_FETCH_AND" , "ATOMIC_FETCH_OR" , "ATOMIC_FETCH_XOR" , "ATOMIC_OR" , "ATOMIC_REF" , "ATOMIC_XOR" , "BACKTRACE" , "BESSEL_J0" , "BESSEL_J1" , "BESSEL_JN" , "BESSEL_Y0" , "BESSEL_Y1" , "BESSEL_YN" , "BGE" , "BGT" ,
97"BIT_SIZE" , "BLE" , "BLT" , "BTEST" , "C_ASSOCIATED" , "C_F_POINTER" , "C_F_PROCPOINTER" , "C_FUNLOC" , "C_LOC" , "C_SIZEOF" , "CEILING" , "CHAR" , "CHDIR" , "CHMOD" , "CMPLX" , "CO_BROADCAST" , "CO_MAX" , "CO_MIN" , "CO_REDUCE" , "CO_SUM" , "COMMAND_ARGUMENT_COUNT" ,
1614"MINVAL" , "MOD" , "MODULO" , "MOVE_ALLOC" , "MVBITS" , "NEAREST" , "NEW_LINE" , "NINT" , "NORM2" , "NOT" , "NULL" , "NUM_IMAGES" , "OR" , "PACK" , "PARITY" , "PERROR" , "POPCNT" , "POPPAR" , "PRECISION" , "PRESENT" , "PRODUCT" ,
1715"RADIX" , "RAN" , "RAND" , "RANDOM_NUMBER" , "RANDOM_SEED" , "RANGE" , "RANK" , "REAL" , "RENAME" , "REPEAT" , "RESHAPE" , "RRSPACING" , "RSHIFT" , "SAME_TYPE_AS" , "SCALE" , "SCAN" , "SECNDS" , "SECOND" , "SELECTED_CHAR_KIND" , "SELECTED_INT_KIND" , "SELECTED_REAL_KIND" ,
1816"SET_EXPONENT" , "SHAPE" , "SHIFTA" , "SHIFTL" , "SHIFTR" , "SIGN" , "SIGNAL" , "SIN" , "SINH" , "SIZE" , "SIZEOF" , "SLEEP" , "SPACING" , "SPREAD" , "SQRT" , "SRAND" , "STAT" , "STORAGE_SIZE" , "SUM" , "SYMLNK" , "SYSTEM" ,
19- "SYSTEM_CLOCK" , "TAN" , "TANH" , "THIS_IMAGE" , "TIME" , "TIME8" , "TINY" , "TRAILZ" , "TRANSFER" , "TRANSPOSE" , "TRIM" , "TTYNAM" , "UBOUND" , "UCOBOUND" , "UMASK" , "UNLINK" , "UNPACK" , "VERIFY" , "XOR" ] }
17+ "SYSTEM_CLOCK" , "TAN" , "TANH" , "THIS_IMAGE" , "TIME" , "TIME8" , "TINY" , "TRAILZ" , "TRANSFER" , "TRANSPOSE" , "TRIM" , "TTYNAM" , "UBOUND" , "UCOBOUND" , "UMASK" , "UNLINK" , "UNPACK" , "VERIFY" , "XOR" ]
2018
2119class InlineDocsHover (sublime_plugin .EventListener ):
2220 def on_hover (self , view , point , hover_zone ):
@@ -34,7 +32,7 @@ def show_doc_popup(self, view, point, word):
3432 if not word in intrinsics :
3533 return
3634 max_width , max_height = 600 , 300
37- html_str = sublime .load_resource ("Packages/Fortran/minihtml/" + intrinsics [ word ] )
35+ html_str = sublime .load_resource ("Packages/Fortran/minihtml/" + word + ".html" )
3836 view .show_popup (html_str ,
3937 sublime .HIDE_ON_MOUSE_MOVE_AWAY ,
4038 point ,
0 commit comments